Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


26032 / 76736 ←次へ | 前へ→

【56040】Re:列の削除について
発言  ひげくま  - 08/5/30(金) 9:14 -

引用なし
パスワード
   ▼クリシュナ さん:
> A     B  C  D  E ... R
>      1/3 1/9 2/9 5/4   10/1
>ケロッグ   3    5  9
>
>マスタ      5
>
>ケビン    1     1     1
>
>クロノス   5  10  18  20
>
>メディチ  3  1   15 1

見にくいので、書き込み欄の右下にある等幅にチェックを入れて、投稿し直してもらえますか?

> 以下のとおりマクロを組みましたが、下の行へ一向に進みませんでした。

以下が実際に組んだそのままのコードですか?

>sub 帳簿締め()
>Dim Ws2 as worksheet
>Range("A2").activate
>
>j = j + 1
>
> For i = 2 To Ws2.Cells(65536, 1).End(xlUp).Row Step 1
>
> Range(Cells(j, 2), Cells(j, 2).End(xlToRight).Offset(0, -1)).Select
> Selection.Delete xlShiftToLeft
> 
>Next i
>
>end sub

1 hits

【56036】列の削除について クリシュナ 08/5/30(金) 1:10 質問
【56040】Re:列の削除について ひげくま 08/5/30(金) 9:14 発言
【56060】Re:列の削除について クリシュナ 08/5/31(土) 11:08 質問
【56043】Re:列の削除について kanabun 08/5/30(金) 11:10 発言
【56059】Re:列の削除について クリシュナ 08/5/31(土) 10:57 お礼

26032 / 76736 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free