Tag: 标签

在Excel中删除和添加这些特殊字符的确切公式是什么?

说我有这个词(不包括引号)。 “XE Premium(TT)2.0T” 我希望上面的这个词出现这样。 我正在用短划线replace空格和句号。 我也完全删除括号。 “XE-高级-TT-2-0T” 到目前为止,我只知道如何在这样的时间做这些事情之一。 = SUBSTITUTE(TRIM(A38),“”,“ – ”) 我如何在Excel中同时执行所有这些操作?

userform.label上的VBA Excel循环

Iam通过代码创build我的标签和checkbox: i = 1 While Not Sheets("I_M_1_1PW").Cells(9 + i, 43) = "koniec" Set theLabel = UserForm1.Controls.Add("Forms.Label.1", labelCounter, True) With theLabel .Caption = Sheets("I_M_1_1PW").Cells(9 + i, 43) .Left = 10 .Width = 100 .Top = 13 * labelCounter Debug.Print labelCounter & " " & theLabel.Caption End With Set chkbox = UserForm1.Controls.Add("Forms.CheckBox.1", "CheckBox_" & i) chkbox.Caption = […]

Excel创buildOutlook电子邮件,但文本不alignment

我有附加的文件,创build收据电子邮件给客户。 我试图让第二个字段在Outlook电子邮件alignment,但迄今未能find解决scheme。 已经尝试了Chr9,vbTab,只是增加了空格等解决scheme将不胜感激 – 我不认为它是一个巨大的任务来解决,但它目前certificate是难以捉摸的。 Sub GenerateEmails() Dim ce As String: ce = "example@email.com" 'create draft emails Dim OutApp As Object, OutMail As Object Set OutApp = CreateObject("Outlook.Application") On Error GoTo cleanup If ce Like "?*@?*.?*" Then Set OutMail = OutApp.CreateItem(0) On Error Resume Next With OutMail .TO = ce .CC = "" .Subject = […]

运行macros时更改多个function区button的标签的VBA代码

我已经使用这里提供的电子表格来创build一个function区,只要把macros指定给button,它就可以很好地工作。 不过,我想包含configuration详细信息在一个选项卡的组中,使其始终可见,而无需消耗Excel表格的房地产。 这是自定义选项卡中的待定状态: 组 我有一个小的macros来select环境,并确定图像中显示的各个字段的值。 这是代码的样子: Sub Change_Configuration() Dim ConfigButton As Object Dim Labeling As String 'SelectEnvironment.Show Environment = "PROD" If Environment = "QAS" Then SourceSystem = "ABC" TargetSystem = "DEF" SourceSchema = "EFG" TargetSchema = "GHI" ElseIf Environment = "PROD" Then SourceSystem = "IJK" TargetSystem = "JKL" SourceSchema = "LMN" TargetSchema = "NOP" End […]

显示标签导出excel显示科学格式的数字

从displaytag导出选项下载的Excel有一个联系号码字段,我们有联系号码范围从10到15位数字(一些前缀+和其他arent),在Microsoft Excel中列联系号码显示科学数字格式示例: 9.20E+011 ,当我正在寻找一种方法来显示它(不pipe它是否以文本forms),关于这个问题的任何想法都将有所帮助。 谢谢

问:VBA – 同时格式化多个图表数据标签?

我想知道是否有人可以帮助我创build一个macros来同时编辑多个图表的数据标签。 我目前在单张纸上有9个图表,需要将数据标签设置为“内部结束”格式。 每当我改变数据集,我需要点击每个单独的图表,并手动按格式到内部结束。 看到有200多个数据集,这变得很麻烦。 有没有一个macros可以做到这一点?

在Excel VBA中从string中删除HTML标记

我想从Excel VBA中的string中删除所有HTML标记。 例如: before_text = "text1 <br> text2 <a href = 'www.data.com' id = 'data'>text3</a> text4" after_text = RemoveTags(before_text) 结果: after_text = "text1 text2 text3 text4"

如何使用Interop设置Excel标签颜色

我以为这会很容易,但显然不是。 我正在研究的这份报告有一些资料来源于陨石坑。 这意味着我需要隐藏工作表的2/3页面,并将隐藏的选项卡变成红色,以清楚哪些正在使用,哪些不是。 到目前为止,我已经以各种方式尝试过Tab.Color和Tab.ColorIndex,并没有find办法。 全ARGB: System.Drawing.Color clr = System.Drawing.Color.FromArgb(255, 255, 0, 0); int index = clr.ToArgb(); int hiddenTabColor = index; … worksheet.Tab.Color = hiddenTabColor; 添加System.ComponentModel以使用Converter: var converter = System.ComponentModel.TypeDescriptor.GetConverter(typeof(Color)); Color clr = (Color)converter.ConvertFromString("#FFFF0000"); … worksheet.Tab.Color = clr; 这些我已经尝试了十几个不成功的组合。 结果总是一个显示xlAutomatic为黑色的选项卡。 我已经尝试了方法的每个重载。 重要的信息是,这是在Visual Studio 2013中使用Interop编写到Microsoft Office Professional Plus 2013(Excel)。

VBA – 在mousemove事件中获取标签的名称

我有以下问题。 我的工作表中有很多以结构化方式命名的标签(Label1,Label2,…,Label9)和分配给它们的mousemove事件macros。 我想在表格A1:A9中获得第i个值,其中“i”是当前“触摸”的标签的数量。 是否有一个简单的方法来获取标签的名称在mouse_move事件(或一些其他事件,如Change_event)。 这看起来是相似的 Private Sub Label47_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) Dim label_name as String Dim which_one as Integer Dim val as Integer label_name = "something like ActiveLabel.Name" which_one = CInt(right(label_name,1)) val = Cells(which_one,1).Value rest code…. End Sub 谢谢你的帮助

我怎样才能从文本列中拉出哈希标签?

我有一个Excel表,其中有一个“描述”列。 此列中的值通常包含从0到3个标签的任何位置,全部以#符号开头。 有没有办法将所有这些标签拉出到列? 也许只是有3个空白列被称为哈希标签1,2,3,并将其拉入每列。 将它们从描述栏中移出并不重要。 描述示例: “#0034 #lost客户端丢失文件” – 拔出0034并丢失 “工人质量差#SusanB#质量” – 拔出SusanB和质量 “#0840客户投诉” – 拔出0840 “很多ipsum” – 什么也不拉出来