![[あすかぜ・ねっと]](/image/asukaze.png "あすかぜ・ねっと"){kind=small}
あすかぜ・ねっと[254] マクロの書き方
たすけてください [2012/11/01 20:29:17]
スイマセン！どなたか助けてください！
エクセルのマクロをCassavaでも使いたいのですが
どのように記載すればいいのか不明です。
1行目の左から14個の文字を全て削除して、それ以外の文字列は残したいのです。
データが多く行数が多いので、手動では出来ません。
下記にエクセルのマクロを記載します。
Sub smaple3()
Dim rng1 As Range
For Each rng1 In Intersect(Sheet1.UsedRange, Sheet1.Range("A:A"))
rng1.Value = Mid(rng1.Value, 15)
Next
End Sub
よろしくお願い致します！
Re: [254] マクロの書き方
あすかぜ [2012/11/01 22:24:13]
下記の 3 行で動くと思いますので、試してみてください。
for(y=1; y<=Bottom; y++){
[1,y] = mid([1,y], 15);
}
よろしくお願いします。
Re: [254] マクロの書き方
たすけてください [2012/11/02 10:07:30]
あすかぜ様
試したら動きました！
大変助かりました！
ありがとうございました。