常に特定のワークシートのユーザーフォームデータをExcelに保存

Question

私は現在vbaで新しく、特定のワークシート（fao）に自動的にデータを保存するユーザーフォームのvbaコードをExcelで作成しようとしています。このワークブックにはさらに2つのワークシート（データ&レポート）があります。しかし、どのシートが開いていても、ユーザーフォームでデータを入力しようとすると、（fao）という3番目のワークシートにデータを格納する必要があります。ここに私のコードです：

Private Sub CommandButton1_Click() 

Dim ws As Worksheet 
Dim RowCount As Long 
Dim ctl As Control 
Set ws = Worksheets("fao") 

RowCount = Worksheets("fao").Range("A2").CurrentRegion.Rows.Count 

    With Range("A2") 
    .Offset(RowCount, 0).Value = Me.TextBox24.Value 
    .Offset(RowCount, 1).Value = Me.TextBox23.Value 
    .Offset(RowCount, 2).Value = Me.TextBox22.Value 
    .Offset(RowCount, 3).Value = Me.TextBox21.Value 
    .Offset(RowCount, 4).Value = Me.TextBox20.Value 
    .Offset(RowCount, 5).Value = Me.TextBox19.Value 
    .Offset(RowCount, 6).Value = Me.TextBox17.Value 
    .Offset(RowCount, 8).Value = DateValue(Me.TextBox25.Value) 
    .Offset(RowCount, 9).Value = DateValue(Me.TextBox14.Value) 
    .Offset(RowCount, 10).Value = Me.TextBox15.Value 
    If Me.OptionButton1.Value = True Then 
    .Offset(RowCount, 7).Value = "Yds" 
    Else 
    .Offset(RowCount, 7).Value = "Mtr" 
    End If 
    End With 
    End Sub 

Answer 1

私はこれがあなたの「質問」に対する答えだと考えています。

With ws.Range("A2")