VBA更改单元格的值

Question

如何使用VBA脚本改变第1行中的值：

st_name st_id st_num 
Alex  112 1113 
Alice  110 1132 

这样：

Name  ID Number 
    Alex  112 1113 
    Alice  110 1132 

Answer 1

有几种方法如何实现你所需要的

请注意根据使用范围的例子"A1:C1"

1变

Cells(1, 1).Value = "Name" 
Cells(1, 2).Value = "ID" 
Cells(1, 3).Value = "Number" 

2株

Cells(1, "A").Value = "Name" 
Cells(1, "B").Value = "ID" 
Cells(1, "C").Value = "Number" 

3变体

Range("A1").Value = "Name" 
Range("B1").Value = "ID" 
Range("B1").Value = "Number" 

4变

[A1].Value = "Name" 
[B1].Value = "ID" 
[C1].Value = "Number" 

5变体，如在替代情况下，当进入范围陆续

[A1:C1].Value = Split("Name ID Number") 

或

Range("A1:C1").Value = Split("Name;ID;Number",";") 

或

Range(Cells(1, 1), Cells(1, 3)).Value = Split("Name ID Number") 

或

Range(Cells(1, "A"), Cells(1, "C")).Value = Split("Name ID Number") 

...等等...这取决于任务，需要实现

Answer 2

在宏，使用以下命令：

Worksheets("YourSheetName").Range("A1").value = "Name" 
Worksheets("YourSheetName").Range("A2").value = "ID" 
Worksheets("YourSheetName").Range("A3").value = "Number" 

将参数更改为Worksheets以匹配正在进行更改的工作表的名称。如果这些不是前三列，则需要在Range方法的参数中更改单元格引用。