BarTender标签打印软件能否用vba操控打印！期待奇迹发生！

lj1226189

上千个标签，每一个都 要进行打印设置，因为是与excel 链接，打印一次要输入 这条记录在excel 中的序号很烦，期待奇迹发生！

lj1226189

再顶一下期待

lj1226189

继续顶相信一定会有希望的

jkenan1

请问bartender能用excelVBA调用吗?能教教我吗，我现在也跟你一样的问题，

tospo

bartender跟EXCEL链接好之后，打印不是很方便的吗，难道上千个标签是不连续的？bartender可以写VBS。

jkenan

tospo 发表于 2017-1-24 00:13
bartender跟EXCEL链接好之后，打印不是很方便的吗，难道上千个标签是不连续的？bartender可以写VBS。

能否分享些经验和代码，新手上路，不太懂行，谢谢

№▁▃风筝﹋

可以将Excel表格作为数据库，条码数据全部在这里设置，然后打开bartender连接打印就可以了。
bartender百科介绍有几个版本，专业版不支持从第三方应用控制
你想直接控制，一般都是调用打印机驱动的接口文件，像dll这种文件，然后传送一些特殊命令字符给它，
你还可以直接直接在excel中设置好打印页面的模板，将需要打印的内容填写进模板，像调用普通打印机一样直接调用打印机不就完了，我平时也打条码标签，都是这么干的。

bayuejun

请参考以下C#代码，实测是可以用的。
using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Text;
using BarTender;

namespace TESTWinForm
{
    public  class LabelPrintHelper
    {

        public static void FileToBarCodePrint(string strFilePath, string BarTend)
        {

            BarTender.Application btApp = new BarTender.Application();
            BarTender.Format btFormat;
            BarTender.BtPrintResult btPrintRtn;
            BarTender.Messages btMsgs = null;

            btFormat = btApp.Formats.Open(strFilePath, false, String.Empty);
            btPrintRtn = btFormat.Print("", false, -1, out btMsgs);

            if (btPrintRtn != BarTender.BtPrintResult.btSuccess)
            {
                foreach (BarTender.Message msg in btMsgs)
                {
                    throw new Exception(msg.Message);
                }
            }

            btFormat.Close(BarTender.BtSaveOptions.btDoNotSaveChanges);
            btApp.Quit(BarTender.BtSaveOptions.btDoNotSaveChanges);
        }

        public static void FileToBarCodePrint2(string strFilePath, string BarFile)
        {
            string path = @"C:\Program Files\默认公司名称\Bartender.txt";
            File.WriteAllText(path, BarFile, Encoding.UTF8);
            FileToBarCodePrint(strFilePath, "");
        }


        private string GetDefaultPrintName()
        {
            System.Drawing.Printing.PrintDocument prtdoc = new System.Drawing.Printing.PrintDocument();

            return prtdoc.PrinterSettings.PrinterName;
        }

    }
}

jkenan

№▁▃风筝﹋ 发表于 2017-1-24 10:24
可以将Excel表格作为数据库，条码数据全部在这里设置，然后打开bartender连接打印就可以了。
bartender百 ...

恩，现在是用这样打印的，所以想进一步优化用VBA调用

amug21

jkenan 发表于 2017-1-24 14:10
恩，现在是用这样打印的，所以想进一步优化用VBA调用

可以将你的模板发上来看一下，可以用VBA按钮  我现在就是这样做的，软件调用 A表作为数据库，B表将想要的数据通过VBA按钮自动复制到A表，并开始让软件开始打印全部标签,