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

如何在特定单元格中为所有工作表写入相同的信息?

谭志用
2023-03-14

我有一个大约有50张表的Excel文件,我在数据的开头插入了一行。现在我要写变量名。例如:在单元格A1中我想写“code”,在B1中我想写“price”,依此类推,直到F1

Sub mycode()

Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
    Range("A1") = "code"
    Range("B1") = "denom"
    Range("C1") = "location"
    Range("D1") = "area_m2"
    Range("E1") = "price_$m2"
    Range("F1") = "zoning"
Next

End Sub

提前感谢!

共有1个答案

萧元徽
2023-03-14

只是因为这激起了我的好奇心才回答:

Sub Test()
    Sheets.Select
    Range("A1:F1").Select
    Selection.Value = Array("code", "price", "foo", "bar", "test2", "test3")
End Sub

请注意,selecting通常是不鼓励的,但在本例中似乎有必要避免循环并将值同时写入所有工作表。

 类似资料:
  • 如何使用Apache POI将文本/图像写入特定的合并单元格。特定单元格意味着,我直接将文本或图像写入B3: D7。下面的代码是每个索引的手动代码,而不是单元格的特定名称和数量。我想通过单元格名称和编号放置。

  • 我有2张纸A和B。如果B张纸中完全相同的单元格不是空的,我想让A张纸给单元格着色。例如,如果页B中的单元格具有字符串,则页A中的单元格将被着色。 假设我想做这个来比较一个大范围,我应该怎么做呢? 示例:https://docs.google.com/spreadsheets/d/1P3Ob_mclpXWmILfKwD4R6JN2wAYPUcNZlmtF9LxilV0/edit?usp=sharin

  • 本文向大家介绍如何使用python在Selenium中的工作表中的单元格内写入值?,包括了如何使用python在Selenium中的工作表中的单元格内写入值?的使用技巧和注意事项,需要的朋友参考一下 我们可以在Selenium工作表中的单元格内写入值。Excel是一个电子表格,扩展名为.xlsx。一个excel工作簿有多个工作表,每个工作表都由行和列组成。 在所有工作表中,当我们访问一个称为活动工

  • 问题内容: 我有一个Excel工作表,它在某些单元格中已经有一些值。 对于前:- 我希望大熊猫写特定的单元格而不接触任何其他单元格,工作表等 这是我尝试的代码。 但是,此代码将删除较旧的单元格值。 我已经提到过:-如何在不覆盖数据的情况下(使用熊猫)写入现有的excel文件? 但是此解决方案不起作用。 问题答案: 我无法使用熊猫来完成我在问题中提出的要求,但是可以使用来解决它。 我将编写一些代码片

  • 本文向大家介绍如何使用python在Selenium中的工作表中的特定单元格中获取值?,包括了如何使用python在Selenium中的工作表中的特定单元格中获取值?的使用技巧和注意事项,需要的朋友参考一下 我们可以在Selenium中的工作表中的特定单元格中获取值。Excel是电子表格,扩展名为.xlsx。一个excel工作簿有多个工作表,每个工作表都由行和列组成。 在所有工作表中,当我们访问一

  • 我正在尝试做一个程序,计算一些东西,并将结果插入到表格中等式旁边的单元格中。我不想给每一个单元格我想要插入的结果不同的类,因为如果我必须这样做1000次,那么代码会变得乱七八糟,我会为表中的每一个单元格提供1000个不同的ID。有没有一个函数可以获取一个单元格的索引或其他东西,然后我可以将值插入到那个单元格中?还是唯一的办法就是制作这些ID?