Access VBA質問箱 IV

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

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


449 / 2272 ツリー ←次へ | 前へ→

【11663】VBAの文字列結合について 白髪頭 10/5/26(水) 13:40 質問[未読]
【11665】Re:VBAの文字列結合について 小僧 10/5/27(木) 13:05 回答[未読]
【11666】Re:VBAの文字列結合について 白髪頭 10/5/27(木) 13:50 お礼[未読]

【11663】VBAの文字列結合について
質問  白髪頭  - 10/5/26(水) 13:40 -

引用なし
パスワード
     koumoku1 = "=Forms![F-売上伝票]!単価"
  koumoku2 = "]"
  koumoku = koumoku1 & LTrim(Str(kaisu)) & koumoku2
    
1:    koumoku = tanka
2:    Forms![F-売上伝票]!単価1= tanka

1:はNG
2:はOK です

単価1・・・・単価10ある場合に次のようにループ文を作りたいのですが

kaisu=1・・・単価1 へ転記
・・・
kaisu=10・・・単価10 へ転記

1:の構文が違うのか、また、この様な記述は不可能なのか
知っている方がいらっしゃれば宜しくお願いします。

【11665】Re:VBAの文字列結合について
回答  小僧  - 10/5/27(木) 13:05 -

引用なし
パスワード
   ▼白髪頭 さん:
こんにちは。

> Forms![F-売上伝票]!単価1= tanka

上記の書き方を明示的に

Forms("F-売上伝票").Controls("単価1") = tanka

と書いても同じ動作になります。
こちらを応用して

Forms("F-売上伝票").Controls("単価" & i ) = tanka

の様にすると Loop での処理が可能になりますね。

【11666】Re:VBAの文字列結合について
お礼  白髪頭  - 10/5/27(木) 13:50 -

引用なし
パスワード
   解決しました!

ループ文が作成できずにIF文をExcelのオートフィルタ機能を使い
VBAに転記して使っていました。

本当に短い行で使えましたので感謝しています。

これからも宜しくお願いします

本当に、有難うございました。

by 白髪頭

449 / 2272 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
1078193
(SS)C-BOARD v3.8 is Free