Microsoft Excel 2010-
我有两个工作表Sheet1和Sheet2。
两个工作表上都有数据表,涵盖了不同类型的数据-如下所示。
<Worksheet "Sheet1">
<DataTable "Table1">
<Columns>
<Column "T1Col1" />
<Column "T1Col2" />
</Columns
</DataTable>
</Worksheet>
<Worksheet "Sheet2">
<DataTable "Table2">
<Columns>
<Column "T2Col1" />
<Column "T2Col2" />
</Columns
</DataTable>
</Worksheet>
Run Code Online (Sandbox Code Playgroud)
当前,T2Col2中的每个单元格都包含以下函数:
=COUNTIF('Sheet1'!B:B, [T2Col1])
Run Code Online (Sandbox Code Playgroud)
我想用[T1Col2]的方括号内的引用替换“ B:B”,但是我不确定如何在单独的表和工作表之间完成此操作。
在找到产生所需结果的信息和/或解决方案时遇到问题,所以在这里.
现在,可能在生产时,我将在工作表上有一个名为范围的"模板".在第一次使用时,这个NamedRange只是rngNamed1在第一次使用之后,可能会有更多类似于这个的命名范围,比如说rngNamed30.
让我们说,在第二次运行之后rngNamed30,我需要再添加3个NamedRange,结果是rngNamed33.
我需要做的是基本上找到最后一个命名范围的最后一行和列,所以我知道从哪里开始复制数据并声明下一个命名范围.
Dim rng As range
Set rng = range("rngNamed1")
'Set rng = rng.Find("*", rng.Cells(1, 1), xlFormulas, xlPart, xlByRows, xlPrevious, False)
Debug.Print rng.Find("*", rng.Cells(1, 1), , , , xlPrevious).Address
Run Code Online (Sandbox Code Playgroud)
大多数解决方案存在的问题是它们基于找到最后一个单元格数据.我只需知道范围的最后一个单元格,无论它是否包含数据.
正如您可能会遇到的那样,MS Excel倾向于将时间转换为十进制值.我确实希望它自动转换值,因为我需要时间值.假设我有以下数据:
出发| 时间
伊斯坦布尔06:45安卡拉01:30
我使用Concatenate函数创建一个所需的字符串作为伊斯坦布尔:08:00和安卡拉:18:30.但是,当我使用公式时,Excel将小时数转换为小数,我得到伊斯坦布尔:0.28125和安卡拉:0.0625.我不希望它转换.我怎样才能做到这一点?
ps:当我将时间值从Excel复制到Notepad ++时也会发生这种情况.此外,当我通过加载项将时间值导入PostgreSQL时,我仍然在列中获得十进制值
我的表是这样的:
| A | B | ...
---------
| 1 | a | ...
---------
| 2 | |
---------
| 3 | |
---------
| 4 | b |
---------
Run Code Online (Sandbox Code Playgroud)
我希望这是我的输出:
| A | B | ...
---------
| a | | ...
---------
| 2 | |
---------
| 3 | |
---------
| b | |
---------
Run Code Online (Sandbox Code Playgroud)
所以我循环列B,只要有值,B那么我应该替换相应的值A
到目前为止,我尝试过这样的:
Sub LoopRange()
Dim rCell As Range
Dim rRng As Range
Set rRng1 = …Run Code Online (Sandbox Code Playgroud) 基于类似于一列的值,我在excel中合并单元格时遇到问题 - 我想保留其他列数据 - 让我们查看一些截图,它会更清晰:

以上是数据的初始状态,我想要实现的是:
我确信有一种方法可以用VB或公式来做 - 我需要最简单的方法,因为这是为了客户而且它需要很容易.
先谢谢大家.
有没有办法阻止Excel 2010对包含多个带有前导加号或减号的数字的单元格进行数学运算?例如
-706795 -1456130 -1869550 -936304 -1729830 -1737860 -687165 -16807800
Run Code Online (Sandbox Code Playgroud)
现在它将数字加总为一个值.我希望它们如上所示.将单元格格式化为文本不起作用.我从CSV获取此数据,并且对其内容的控制有限......
我有一组单元格,第一个字符串永远不会更改,它始终会(直到编码器更改它)20字符(inc空格).
然后我想从剩余的序列中提取3个数字(在某些情况下为2).
The monthly cost is 2 silver, 1 copper and 40 iron.
The monthly cost is 1 silver, 94 copper and 40 iron.
The monthly cost is 1 silver and 75 copper.
The monthly cost is 8 silver and 40 copper.
The monthly cost is 1 silver.
The monthly cost is 99 silver, 99 copper and 99 iron.
The monthly cost is 1 gold.
Run Code Online (Sandbox Code Playgroud)
在上面的示例中,您可以看到前20个字符后没有设置值.
1 or 99 silver
1 or 99 copper
0, 1 or 99 …Run Code Online (Sandbox Code Playgroud) 我有这个代码显示目标单元格的rgb颜色:
Function getRGB(RefCell)
Dim mystr As String
Application.Volatile
mystr = Right("000000" & Hex(RefCell.Interior.Color), 6)
getRGB = Application.Hex2Dec(Right(mystr, 2)) & ", " & _
Application.Hex2Dec(Mid(mystr, 3, 2)) & ", " & _
Application.Hex2Dec(Left(mystr, 2))
End Function
Run Code Online (Sandbox Code Playgroud)
我需要这个代码而不是炫耀其他单元格的rgb,会改变自己单元格的背景颜色.也许有人知道该怎么做?
我需要的是根据FIAP/Medium&Year列标准计算TITLE中的唯一值的公式.
这需要从工作表列M /年中查看日期开始,范围是23/03/13 - 01/06/16.然后需要检查列I/FIAP Medium寻找'Digital '并最终计算A/Title中的唯一图像.
这是工作表栏
Title FIAP/Medium Year
Conors Push Digital 3/23/2013
Conors Push Digital 4/1/2013
Flippin Hell Digital 4/1/2013
Narrowing the Gap Digital 4/1/2013
The Perfect Storm Digital 4/8/2013
Conors Push Digital 4/12/2013
Splash and Dash Digital 4/12/2013
Wind Power Digital 4/12/2013
Conors Push - 4/28/2013
Eyes On The Ball - 4/28/2013
Narrowing the Gap - 4/28/2013
The Bunkers Demise - 4/28/2013
A Few Inches More Digital 5/1/2013
Entwined Digital 5/1/2013
Conors Push …Run Code Online (Sandbox Code Playgroud) 你用什么公式检查另一个细胞是否有配方?例如,我有2列,A包含包含公式或值的单元格.
(A列通常包含公式,但其他用户尝试通过直接键入和替换之前的公式来更改其值)
在列BI中,如果列A上的单元格具有公式,则要添加将显示"HasFormula"的公式,如果它包含值,则表示"PlainValue".
我想也许正在使用,=ISNUMBER()但这可能不准确.
我正在使用Excel 2010.