プロが教える店舗&オフィスのセキュリティ対策術

マクロ初心者です。

一番左の文字を削除するマクロを作成しています。
AY12から最終行まで一番左を削除するとつくりたいのですが最終行のところをどうかけばよろしいですか。

Do until ws1.range("c" & row) = ""
for each rng in ws2.range( "AY12:AY最終行)
rng.value =mid(rng.text.2)
next rng

gooドクター

A 回答 (2件)

こんばんは、ドットとコロン気を付けて


>最終行のところをどうかけばよろしいですか。
書き方色々、、
ws2.Range("AY12:AY" & ws2.Cells(Rows.Count, "AY").End(xlUp).Row)
ws2.Range("AY12", ws2.Cells(Rows.Count, "AY").End(xlUp))
    • good
    • 0

こんばんは



以下一例です。

For rw = 12 To Cells(Rows.Count, 51).End(xlUp).Row
 Cells(rw, 51).Value = Mid(Cells(rw, 51).Value, 2)
Next rw
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

gooドクター

このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング