我想根据从选择列表中选择的类别在 C5 中输出串联的电子邮件地址。
问题是,我可以根据 C2 中的选定类别过滤单元格 A18 中的表 1 吗?“Table1[Category2]”当前是硬编码的。这可能是一个动态选择的数据列吗?
C5: =TEXTJOIN(", ", TRUE, B18:B21)
A18: =FILTER(Table1, (Table1[Parties]=B5)*(Table1[Category2]="X"), "")
MS Word 中有一个很好的功能,当您选择整个文本并将其居中时,它可以消除整个文档中的前导和尾随空格,然后返回到所需的对齐方式。
所以这(space)(space)(space)text text text(space)(space)
应该导致text text text
当我通过单击 Word 中快速访问工具栏或功能区上的中心图标手动执行此操作时,它反复为我工作。但是每当我使用下面的代码通过宏自动管理它时,这个解决方案对我不起作用。那些不受欢迎的空间仍然存在。
Selection.WholeStory
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter 'after this, there should be no leading/trailing spaces anymore
Selection.ParagraphFormat.Alignment = wdAlignParagraphJustify
你以前有过这种经历吗?你能复制这样的结果吗?
我想在执行下一行代码之前进行检查。
我写了一个这样的简单结构,但它检查范围内的第一个单元格,如果该单元格为空,由于满足要求和 GoTo 标签,它会执行下一步。
我需要它做的是检查所有单元格,并且仅在所有单元格为空时才继续(在单独检查每个单元格后不进入下一步)。如果其中之一不为空 - 潜艇应该退出。
是否可以使用这样的代码来做到这一点,或者在这种情况下我需要不同的方法吗?
Sub Check_and_execute
Dim Cell As Range
For Each Cell In ThisWorkbook.Sheets("Sheet1").Range("A1:A10")
If Cell.Value = "" Then
GoTo NextStep
Else
MsgBox "Not all cells are empty."
GoTo EndSub
End If
Next
NextStep:
'code
EndSub:
End Sub