我广泛地浏览了这些论坛,但还没有找到解决我所遇到的奇怪问题的有效解决方案。 目前,我有一个电子表格,当双击W列中的单元格时,将调用vba模块在被单击的同一行的P列中插入一个文本字符串。这适用于以下模块: Sub CommentPrinted()
ActiveCell.Offset(0, -7).Value = "NL at Nurses Station"
End Sub 这就像预期的那样工作,但是现在我想稍微修改一下这个模块,以插入文本字符串以及括号中的当前日期和月份。在尝试这样做时,我将模块更改为: Sub CommentPrinted()
Active
这是在处理文本,而Excel的If函数在检查单元格范围内的文本时不希望返回有效的响应。
我需要一个单元格来检查数组中可能重复的文本。每当它找到该文本时,它就需要检查另一列中的不同文本。如果它发现这两列都包含两个文本字符串,则需要在其他两列右侧的另一列中返回值。
示例:
A B C
1| Hi | Bill | 25
2| Do | You | 50
3| Like | Cheese | 75
4| Hi | Bill | 100
因此,我需要一个在A列中查找"Hi“的公式。如果它在A列中查找"
我正在尝试创建一个公式,它可以搜索单独的工作表,并使用文本字符串返回正确的单元格。条件(如果过滤工作表)包含一个日期范围,<=DATE(YEAR(U$1),MONTH(U$1)+1,DAY(U$1))-31基本上是从月底起超过30天的任何内容,其中日期由用户在单元格U$1中设置,并与文本字符串匹配。我已经尝试了几次索引匹配的迭代,在数组中使用匹配,但仍然得到#N/A错误。
逻辑是返回G列中相应单元格的内容,如果日期早于月底前30天(F列中的日期),则按从旧到新的顺序排序,P列必须包含文本字符串"file not validated“。
=COUNTIFS(Summary!P:P,
我正试图找到解决以下问题的方法:A列包含名称,我希望将这些名称保留在那里,并使用自动编号的代码。类似于:
我在StackOverflow上看了不少例子,但这些代码主要是自动编号一些单元格,而不需要将文本保存在同一个单元格中:。
你能帮帮我吗?
下面是我使用的代码,但我只能插入数字,而不是将文本保存在同一个单元格中。
Sub autonumber()
Dim i As Integer
Dim cell As Range, rng As Range
Set rng = Range("A1:A10")
i = 1
For Each cell In rng
我想在"A1“中插入一些文本"ABC”,并在"B1“中插入下面的单元格一个if语句。但是,我只插入了第一个条目"ABC“,然后在FormulaR1C2 "Object doesn't support this property or method"处出现错误。我不确定我是否正确使用了R1C2。我假设它代表第一排第二列,有人能帮我吗?
Dim Excel_App As Object
Dim strExcel As String
Set Excel_App = CreateObject("Excel.Application"
我正在努力理解VBA中的if和否则的if,但是我的代码不起作用。你能告诉我我做错了什么吗?
Sub columnA()
Dim r As Range
Dim src As Worksheet
Dim copyRange As Range
Dim pasteRange As Range
Set src = ThisWorkbook.Sheets("report")
lastRow = src.Range("D" & src.Rows.Count).End(xlUp).Row
Set copyRange = src.Range("D3:D"
我需要下面的公式。
我有两列A& C包含文本,我需要查找A列中单元格的文本是否在C列中的任何位置。B列中A单元格中的文本的搜索查询结果。
在A2中,我希望能够列出‘真或假’或一个数字,无论该文本是否在列C的任何位置。
示例: A2中的文本不必与C列中的单元格文本完全相同,但文本应该以相同的顺序出现。
ie. in A2 the text is **elephant**
in Column C
C2 French cat eating = (Answer in B2) No
C3 Black German dog running = (Answer in B3) No
C4 Grey