質問事項が分かり辛く申し訳ありません。
テーブルのIDは昇順で入っている状態です。
具体的には、以下の様な場合です。
区分CD 会社名
-------- -----------
1100 A社
A社
B社
B社
1200 A社
C社
A社
B社
上の状態から
下の状態にしたいです。
区分CD 会社名
-------- -----------
1100 A社
1100 A社
1100 B社
1100 B社
1200 A社
1200 C社
1200 A社
1200 B社
上記の状態に出来ないでしょうか?
以前の質問からhttps://oshiete.goo.ne.jp/qa/11811376.htmlを参考にしましたが、こちらは下から上に埋める仕様となっており、いろいろ試しましたが上手くできませんでした。
No.1ベストアンサー
- 回答日時:
前回回答をちょっと変更したものです
Sub CD_Update()
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cn = CurrentProject.Connection
Set rs = New ADODB.Recordset
dim strSQL as string
strSQL="SELECT * FROM Sample ORDER BY Id"
'Sample はテーブル名、IdはインデックスとなっているIDに置き換えてください。
rs.Open strSQL, cn, adOpenKeyset, adLockOptimistic
Do Until rs.EOF
If not IsNull(rs!区分CD) Then
Counter = rs!区分CD
else
rs!区分CD=counter
endif
rs.MoveNext
Loop
rs.Close: Set rs = Nothing
cn.Close: Set cn = Nothing
End Sub
でいけるんじゃないかな?
検証はしていないので、バックアップとってお試しください。
迅速に回答を頂き大変助かりました。
回答頂いた内容を確認すると、なるほどと納得出来き勉強になりました。
実際に正しく動作することも確認出来ました。本当にありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Windows 10 Windows11 を初期状態に戻す方法について。 2 2022/11/21 20:09
- その他(Microsoft Office) Excel テーブル内の空白行の削除 3 2024/02/02 17:12
- Excel(エクセル) 至急です><Excelの関数を教えてください。 2 2022/03/22 17:56
- PHP ここで言う空文字の意味とは? 1 2022/08/05 16:27
- リフォーム・リノベーション マンションリフォーム工事の際に提出する「申請書・誓約書」について 3 2022/08/04 09:45
- その他(悩み相談・人生相談) 単身で地方移住し、失敗したと感じる20代です。 最近仕事にも集中できず、何事も上の空で誰にも相談でき 4 2023/07/04 11:54
- その他(悩み相談・人生相談) 単身で地方移住し、失敗したと感じる20代です。 最近仕事にも集中できず、何事も上の空で誰にも相談でき 2 2023/07/04 13:12
- その他(悩み相談・人生相談) 単身で地方移住し、失敗したと感じる20代です。 最近仕事にも集中できず、何事も上の空で誰にも相談でき 3 2023/07/04 20:57
- Java javaのCSVデータ読込についてです 6 2022/07/02 10:58
- その他(悩み相談・人生相談) 単身で地方移住し、環境に馴染めず適応障害になりかけている。 最近仕事にも集中できず、何事も上の空。 2 2023/08/26 19:48
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
accessの代わりになるもの
Access(アクセス)
-
エクセルで2桁から5桁の数字があります。その数字のダブリを解消する方法を教えてください。
Excel(エクセル)
-
ACCESS VBA でのエラー解決の根拠がわかりません エラー「イベントプロパティに指定した式・・
Access(アクセス)
-
-
4
セルの結合の連続技
Excel(エクセル)
-
5
エクセルvbaについて
Visual Basic(VBA)
-
6
Excel VBA マクロ あるフォルダー内の複数のファイルを統合したいです
Visual Basic(VBA)
-
7
他人が作ったマクロの理解
Excel(エクセル)
-
8
10行目にフィルターを使用して見出しがあります。列はA:DFで11行目以降(2000行ぐらい)はデー
Visual Basic(VBA)
-
9
データの入力規則 Excelです。 例えば、 C1セルに、 A列のデータ(B列にあいうえお"と入っ"
Excel(エクセル)
-
10
エクセルVBAの配列について
Visual Basic(VBA)
-
11
Excelの空のセル
Excel(エクセル)
-
12
VBAコードについて
Visual Basic(VBA)
-
13
Access関数について クエリで空白の場合、ID順で次に値が入っている数値を代入するには
Access(アクセス)
-
14
VBA 何かしら文字が入っていたら
Visual Basic(VBA)
-
15
VBA とびとびの列を結合させる
Visual Basic(VBA)
-
16
Excel 数行分セル結合したあと、結合した一番下の行を非表示にしたら、罫線が印刷されません。
Excel(エクセル)
-
17
Range.RemoveDuplicates メソッド
Visual Basic(VBA)
-
18
ある値に対して3番目に大きな値を、なければ2番目に大きな値、それもなければ1番大きな値を表示させたい
Excel(エクセル)
-
19
Excel マクロについて
Visual Basic(VBA)
-
20
図面上に, ① ② ③………を入れたい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
複数の値を1レコードに表示した...
-
limit offset はupdate文には使...
-
【SQL】他テーブルに含まれる値...
-
SELECT INTOで一度に複数の変数...
-
ACCESS クエリーでソートの不具合
-
Excelでしりとりを作る方法
-
IDとパスワードについて。
-
SQLで、Join句で結合したテ...
-
sqlに記述できない文字
-
Accessで今日から5日後
-
絶対参照と相対参照の違いを教...
-
truncate tableを使って複数の...
-
フラグをたてるってどういうこ...
-
Access にて "mm:ss.0" 形式の ...
-
PostgreSqlのシステムスキーマ...
-
ExcelのVLOOKUP関数の動作をMyS...
-
SQLサーバに対するSQL文で抽出...
-
IN句に副問合わせを使う場合と...
-
テーブル名が可変の場合のクエ...
-
T-SQLで任意の箇所で強制終了す...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
AccessVBAについて テーブルの...
-
SQLで、過去で一番大きい日付の...
-
SQLでレコード間の値の交換
-
1つのSQLで2段階の抽出を行い...
-
mysqlのindexとprimary keyにつ...
-
【SQL】項目に紐づいている情報...
-
複数の値を1レコードに表示した...
-
limit offset はupdate文には使...
-
こちらのテーブルにあってこち...
-
【SQL】他テーブルに含まれる値...
-
SELECT INTOで一度に複数の変数...
-
フラグをたてるってどういうこ...
-
スキーマ
-
sqlに記述できない文字
-
オラクルのUPDATEで複数テーブル
-
Accessで今日から5日後
-
timestampのデータはどのように...
-
UPDATEで既存のレコードに文字...
-
pandasでsqlite3にテーブル作成...
-
テーブル名が可変の場合のクエ...
おすすめ情報