|
▼vba初心者 さん:
こんにちは、根本的な解決方法ではないのですが
「A1」に「出席番号」が記述されているのであれば
書換えが必要になるのは「A2」以降でしょうから
For文を2から回してはいかがでしょうか?
尚途中に数字以外の文字列があるようでしたら
この方法は使えませんね。
For i = 2 To file2.Worksheets("sheet").Range("A65536").End(xlUp).Row 'A列全てを検索対象とする
Set s = file2.Worksheets("sheet").Range("A" & i)
file2.Worksheets("sheet").Range("A" & i) = Val(s)
Next i
>▼SS さん:
>セル「A1」にはその列に入っているカラム名といいますか、
>例えばセル「A1」に「出席番号」と記述しており
>でセル「A2」から下に(出席)番号が「1、2、3・・・」
>と振られているような感じです。
>
>すみません、ちょうど良い言葉が思い浮かびませんでした。。。
>
>
>セル「A1」の書式設定は標準になっています。
|
|