EXCEL中的VB 如何从表格中提取参数？

2024-12-02 02:20:19

推荐回答（3个）

回答1：

你是说excel 的vba？
你的这一列 15个数据在哪里？哪一个区域？
假如你的数据在A1:A15 中
主语句是：

Sub test()

Range("C1:C15").Select
Selection.copy
Range("T1").Select
ActiveSheet.Paste

End Sub

就和你用手工在在工作表中复制粘贴一样……
如果是其他的什么特殊位置并且不连续的话你可以使用 For ……Next 语句

回答2：

T1== Worksheets(12).Cells(1, 3).Value
T2== Worksheets(12).Cells(2, 3).Value
T3== Worksheets(12).Cells(3, 3).Value
T4== Worksheets(12).Cells(4, 3).Value
T5== Worksheets(12).Cells(5, 3).Value
T6== Worksheets(12).Cells(6, 3).Value
T7== Worksheets(12).Cells(7, 3).Value
T8== Worksheets(12).Cells(8, 3).Value..........

回答3：

Dim temp As String
Dim count As Integer
For count=1 To 15
    temp=Range("A" & Trim(Str(count))).Text
    Range("T" & Trim(Str(count))).Select 
    ActiveCell.FormulaR1C1=temp
Next