教えてください。
Sheet1の"A1"に"1"、"A2"に"2"、"A3"に"3"と数字が並んだ状態です。
次の関数を利用して範囲から値を表示します。
----------------------------------
Dim c As Variant
For Each c In Sheet1.Range("A1:A3")
MsgBox c.Value
Next
----------------------------------
このやり方だと、当然上から1,2,3と表示されます。
やりたいことは物理的に元データをいじらずに(並び替えはせずに)
VBAだけで範囲の下から上への処理を行いたいです。
よろしくお願いします。
No.1ベストアンサー
- 回答日時:
[例1]
Dim i As Long
With Sheet1.Range("A1:A3")
For i = .Cells.Count To 1 Step -1
MsgBox .Item(i).Value
Next
End With
[例2]
Dim i As Long
For i = 3 To 1 Step -1
MsgBox Cells(i, "A").Value
Next
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 他のシートからコピーする下記マクロで貼付け位置をWorksheets(1).Range("A3")の 8 2023/01/30 18:48
- Visual Basic(VBA) Sheet1のA列にコードB列にメアド、Sheet2のB列にコード一覧とD列にメアド一覧があり、Sh 3 2022/10/19 11:57
- Visual Basic(VBA) VBA横データを縦にしたいです 2 2023/08/08 19:38
- Excel(エクセル) VBAで組み合わせ算出やCOUNTIFSの処理を高速化したいです。 4 2022/04/07 02:38
- Visual Basic(VBA) VBAの繰り返し処理について教えてください。 3 2022/08/02 13:21
- Visual Basic(VBA) 複数シート一括作成後に、特定範囲の数式は値で貼り付けしたい 3 2022/10/07 11:18
- Visual Basic(VBA) このVBAでExcelアプリケーションを作成は必要ですか? 3 2023/07/19 21:13
- Excel(エクセル) VBA 特定の列に入っているテキストをコピペ 2 2023/06/14 11:24
- Visual Basic(VBA) Sheet2からオートフィルターで売上日を抽出した件数をカウントし、その件数をSheet1のセルB1 2 2023/01/12 12:24
- Visual Basic(VBA) データのある範囲を選択するVBAについて 2 2022/09/03 00:20
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
マクロで最終行から上に検索を逆にしたい
Excel(エクセル)
-
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
VBA シートのボタン名を変更したい
Visual Basic(VBA)
-
-
4
Excelマクロでオプションボタンの名前の変更をしたい
Excel(エクセル)
-
5
エクセルVBAのIf,Then 構文でOr条件とAnd条件の結合方法?
Excel(エクセル)
-
6
エクセルマクロで特定の範囲が空白という条件
Excel(エクセル)
-
7
vbaで指定したセルより下の行を指定する方法について vbaの質問です。 例えば、「C6」セルより下
Excel(エクセル)
-
8
【vba】指定範囲の中に任意の文字があるときの条件分岐
Excel(エクセル)
-
9
もしセルが#N/A"なら~をする・・・には?"
Excel(エクセル)
-
10
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
11
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
12
EXCEL VBAで、セルの文字列の前後に文字を入力する方法は?
その他(Microsoft Office)
-
13
エクセルで空白以外のセルの値を取りたいのですが
その他(Microsoft Office)
-
14
「Columns(A:C")」の列文字を数字にして表記したい"
Excel(エクセル)
-
15
エクセル マクロ オートフィルの終点の指定について
Excel(エクセル)
-
16
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
17
IF関数で空欄(")の時、Nullにしたい
その他(Microsoft Office)
-
18
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
19
マクロについて。S列の途中からデータがある最終行まで消したいのですが、 Range(”S8”,Cel
Visual Basic(VBA)
-
20
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
テキストボックスのvalueとtext...
-
VB.NETでコンボボックスの1行目...
-
マクロ 特定のセル値のみクリ...
-
Excel VBA 複数選択したリスト...
-
【C++/CLI.NET】コンボボックス...
-
VB.NETでアクティブなformを知...
-
vbaの繰り返しで求める最大値に...
-
C# get set
-
VB.NetでMy.Settingsにセットさ...
-
Excel vba ユーザーフォームテ...
-
[VBA]選択範囲の下から上に処理...
-
ASPの変数の値をJAVA Script内...
-
値を返さないコード パス
-
VB.NETでプログラム間通信を簡...
-
Excel VBAのリストボックスの値...
-
スタックポインタ取得 アセンブラ
-
VB 2005においての0から12ま...
-
PL/SQLでのTO_DATEの時間取得に...
-
PysimpleGUIでデータベースを作る
-
代入したのに値が更新されない...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
テキストボックスのvalueとtext...
-
マクロ 特定のセル値のみクリ...
-
Geogebraの操作方法について
-
VB.NETでコンボボックスの1行目...
-
VB初心者。小数点以下の表示で...
-
変数名の取得
-
値を返さないコード パス
-
【C++/CLI.NET】コンボボックス...
-
Excel VBAのリストボックスの値...
-
PL/SQLでのTO_DATEの時間取得に...
-
Powershellのparamについて
-
vbaの繰り返しで求める最大値に...
-
C#の質問です
-
VBA ドロップダウンリストを残...
-
VBA(自然数)
-
シーケンサで最小値を保持する
-
[VBA]選択範囲の下から上に処理...
-
vbscriptを使いexcelを参照して...
-
[VB.net] DataGridViewのコンボ...
-
変数に代入してある数値を表示...
おすすめ情報