受講生の声

エクセルマクロVBA発展編2を受講された方の成果報告です

ちょっと前は、こんなマクロが書けるようになるなんて夢のようでした

匿名希望

ReDim Preserve arysh(j)
arysh(j) = .Name
j = j + 1
End If
End If
End With
Next

Worksheets(arysh).Select

End Sub


こんな感じで。(条件を変えればいろんなシートを選択するのに使えそうです。)
ちょっと前はこんなマクロが書けるようになるなんて夢のようでした。
ReDim Preserve arysh(j)
arysh(j) = .Name
j = j + 1
End If
End If
End With
Next

Worksheets(arysh).Select

End Sub


こんな感じで。(条件を変えればいろんなシートを選択するのに使えそうです。)
ちょっと前はこんなマクロが書けるようになるなんて夢のようでした。

トップへ