当前位置: 首页 > 知识库问答 >
问题:

将范围内的数据复制到记事本的代码

谭坚诚
2023-03-14

我不懂编码,我试过了,但对我来说没有意义。非常尊重所有能够学习和理解这门复杂的其他语言的人。如果你们能帮忙,我将不胜感激。

我怀疑这是一个简单的问题要解决...

我有一个单元格范围,A1:E30,在B列和C列的单元格中,该范围内的数据是使用下拉列表输入的,当某些数据输入到这些单元格中时,信息会自动输入到同一行的a列和E列中。并非该范围内的所有单元格都将包含数据。

我想要的是一个命令按钮,当按下该按钮时,将只复制此范围内包含文本的单元格,然后将文本粘贴到记事本中,没有任何空行,并将相应的单元格彼此相邻。

我可以做最基本的:

Range("A1:E30").Copy
Shell"notepad.exe",VbNormalFocus
Sendkeys"^V"

代码复制整个范围,但这包括空行。

有没有办法满足我的需要?

任何帮助都将不胜感激。

共有1个答案

鄢博简
2023-03-14

如果空行在数据块内,则可以在复制之前进行排序。如果空行位于末尾,则可以找到复制之前的最后一行数据,并且只复制数据。

LastRow=Cells(Rows.Count,1).End(xlup).Row
Range("A1:E" & LastRow).Copy
 类似资料:
  • 对于我的Java类,我正在编写一个小程序,首先选择一个介于1和100之间的数字。然后,它会提示用户开始猜测正确的。如果用户对的猜测过高或过低,程序会打印出一个新范围,供他们在该范围内进行猜测。如果用户输入或,程序只需重新要求用户输入,但不会以任何方式更改范围。 示例输出(当机密号为20时)如下所示: 该项目似乎已经基本完成,但只有一个例外。其中一个要求是,当用户键入的超出我们给定的1和100范围时

  • 我的方法是生成所有素数直到(埃拉托色尼筛),并检查给定范围内的每个数是否可被素数的平方整除。这些数字的计数从范围的长度中减去,以给出平方自由数。 但是这种方法在复杂度上超时了,请建议一些其他的方法

  • 我正在做关于收入分配的项目……我想生成随机数据来测试这个理论。假设我有N=5个国家,每个国家有n=1000人口,我想为每个人口中的每个人生成随机收入(NORMAL DISTRIBUTION),收入约束在0到1之间,所有国家的均值和DIFFERENT均方差。我使用函数rNorm(n, Memex, sd)来做这件事。我知道统一分布(runif(n, min, max)有一些设置min, max的参数

  • 我试图将一系列数据从一个工作表复制到不同的工作表,在识别出我要粘贴到的工作表上的单元格值与“复制自”工作表中的单元格匹配的日期之后。当我从“粘贴到”工作表(“每日摘要记录”)运行宏时,该宏起作用,但如果我从另一个工作表运行该宏,则该宏不起作用。我希望能够从工作簿中的任何工作表运行它,尤其是从PASTE from工作表运行。 以下是我的代码: 有关两个工作表的图像,请参阅附件: '每日明细' “每日

  • 问题内容: 抱歉,是否曾有人问过这个问题,但我进行了广泛调查,没有结果。 我想创建一个新列,该列根据某些规则映射的多个值,例如a = [1,2,3]为1,a = [4,5,6,7]为2,a = [8 ,9,10]为3。一对一映射对我来说很清楚,但是如果我想按值列表或范围进行映射怎么办? 我遵循这些原则… 问题答案: 有几种选择。 熊猫通过/ NumPy通过 NumPy通过 的元素是布尔级数,因此对