隣のシートを参照して逃げる>こんにちは、メルマガ発行中の三流プログラマーKen3です。意外な解決方法のメールを貰ったので、チョット発行してみます。いつものセリフで、そんなたいしたことじゃないので今回もご安心を。Subとか使えるよ、使ってね。応用すると、変更の少ないプログラム書けるよなんて言ってましたね。詳細は、/vba/backno/vba013.htmlから参照可能です。>客先から依頼が来ました。>セット位置を+1すれば修正完了でしょ。>チョロイ修正でしたね。勝手にExcelファイルを自由に修正できるよ。>は、変更無しでそのままでOKなんですよ。(これホント!)なんて、書いてました。2.ある読者から意外な方法のメールをいただく。勝手にExcelファイルを自由に修正できるよ。対して、ある読者から意外な方法のメールをいただきました。いつものようにヒッパッタケド、たぶんみんな知ってる方法で、シートを隣にコピーして、タイトルやフォーマットを変更する。変更された位置に隣の元シートを参照する式を入れる。=Sheet1!$B$4みたいに、隣を参照する。このファイルを保存して次回から使うとOKなんだってさ。(テストファイルどうもです、参考になりました、盲点?かなぁ。隣から=Sheet1!$B$4と参照するからOKなんですね。*まぁ、必要無いシートが残ってしまうけどね。(最後の抵抗、、、)データの流れは、Accessでボタンが押される。フォームの値を開いたExcelシートB4にセットされる。同時に隣のシートで=Sheet1!$B$4と参照するからなるほどねぇ、これもプログラムを修正しない手かぁ。この方法を送ってくれた自称三流事務員さんは、Excelで作業をしていると、A社向けフォーマット、B社向け・・・F社向けと同じ項目を違う書式で印刷しているので、=シート!セル番地(=Sheet1!$B$4)でいつも小細工してるんだって。すごい、使える一流事務員さんだよじなくって、Excelの豊富な機能を使って工夫して処理することも重要かなぁ。がんばってやっていきますか。3.勝手にプログラムの話へ*/今までの流れをふまえ、プログラム系の話に強引に持って行く。Accessフォームの値をExcelにセットする処理を少し工夫して下記のようにしてみる。・・・・・シート名DATAのセルA4番地に変更する。Excel側では、実際の表を=DATA!A1=DATA!A2=DATA!A3=DATA!A4と参照設定して表を作成する。これなら、Accessからのデータセット処理も変更無く、Excel側では自由にフォーマットが作成でき、また、複数のXX社向けフォーマットにも対応可能となる。客先からフォーマット変更を頼まれても、イヤな顔をしないで、対応できますね。自由にシートを追加して、活用して下さい。カッコつけた会話が可能かなぁ。プログラム同様、いろいろな方法があるんだなぁと思いました。拾い読みして、1つでも何かの参考となれば幸いです。発想力を磨こうとあらためて思った、三流プログラマーKen3でした。ページフッターここまで、読んでいただきどうもです。広告など気になったジャンル↓を選択してください。)]・・・VBAからOutlookを使い、メール関係を処理するサンプルです↑上記3つみたいなCreateObjectで他のアプリケーションを操作するサンプルが人気です。入力・処理・出力]※↑文章の味付けが変わっていて、お口に合うかわかりませんが。※※読んで、気分を悪くされたらスミマセン。[VBA系バックナンバー目次へ移動]。