Gizport
1 回答
0
Share (facebook)
39
view
全般

他のファイルを参照するマクロの構築 ■ 依頼の目的/概要 単純作業の...

他のファイルを参照するマクロの構築 ■ 依頼の目的/概要
単純作業の効率化

■ 重視する点/検討基準
完成度・単純さ・動作が重くならない事
今後自分自身でも修正・改善が行える様に手順を教えて頂く事

■ 内容
(使用環境:Mac OSX 10.8.5、Excel for Mac 2011 14.3.8)
マクロの作成をお願いしたいデータ、「決済表.xlsx」を添付しています。エクセルファイルを添付できなかったので、画面キャプチャの画像です。
請求書はエクセルデータで別々に作成してあります。
名前は「請-1311-01.xlsx」〜「請-1311-30.xlsx」です。01から連番で30まで、30個のブックがあります。それぞれのブックの「H22」のセルに売上金額を入力してあります。
「決済表.xlsx」の「D1」セル、「振替伝票.xlsx」の「M18」セルに請求書の売上数字を引っ張ってきたいのです。その際、オーダー番号(「決済表.xlsx」の「A8」セル、「振替伝票.xlsx」の「F2」セル)を認識しそれぞれ該当する請求書ブックから数字を引っ張るマクロを組んで頂きたいのです。
オーダー番号はWST-1311-01〜WST-1311-30です。(同様にWST-1314-01〜WST-1314-30、WSS-1321-01〜WSS-1321-30があります。オーダー番号を変更する事は難しいです。。「WST」はずっと固定、「-13」は西暦の2桁、その後の「11」もずっと同じ、そして各オーダー毎に連番で01〜30まであります。)
入力が簡単になる様に、オーダー番号を入力するセルの書式設定をユーザー定義で設定しています。右記、一例です。「"WST-1311-"00」

下記の通りマクロを組むと良いとのアドバイスも知人から頂いたのですが、自分自身ではうまくできませんでした。ご教授をお願いします。より良い方法があれば、もちろんそれを歓迎します(INDIRECT関数では参照元のファイルを開いていないと「#REF!」と表示されてしまうので、実用的ではありませんでした)

1.リンク元ファイルの名前を確定
2.確定したファイルをマクロで探し開かせる
3.開いたファイルの目的のセル(例:「H22」)を目的のセル(「決済表.xlsx」の「D1」セル、「振替伝票.xlsx」の「M18」セル)にペースト
4.リンク元ファイル
Yahoo!知恵袋 3908日前
コメントする
お気に入り
1
質問者が選んだベストソリューション
失礼します。

Windows版Excelですが参考になるかもしれません。
環境に合わせてパス名、ブック名、シート名等書き換えてください。
決済表.xlsxの場合です。
実行時、決済表.xlsxブックは開いておいてください。
参照式を書き込み後値化しています。
値化不要の場合は★2の行を削除してください。
請求書ブックは開く必要はありません。
(例1)
Dim myPth As String
Dim myFile As String
Dim myNFL As String

myPth = "D:Excel"
With Workbooks("決済表.xlsx").Sheets("Sheet1")
With .Range("A8")
myNFL = .NumberFormatLocal
myFile = Format(.value, myNFL)
myFile = Replace(myFile, "WST", "請")
End With
With .Range("D1")
'--参照式
.Formula = "='" & myPth & "" & myFile & "" & "Sheet1'!H22" ’★1
'--値化
.value = .value ’★2
End With
End With
Yahoo!知恵袋 3902日前
シェア
 
コメントする
 

参考になったと評価
  このQ&Aは参考になりましたか?

Share (facebook)
その他の解決方法を知っていますか?
回答する
全般
67
Views
質問者が納得体験記見つけました。参考になるかと。 http://takechi-tateki.com/ガジェット/スマートフォン/sony-xperia-z-ultra-lte-c6833-をイーモバイルのgl07s-simで使う設定方法.html
3891日前view67
全般
34
Views
質問者が納得状況が良くわからないのですが >>設定にて項目の一番長い時間が30分 具体的に何の項目を30分にセットしているんでしょうか? その携帯には独自の節電機能でNXエコやアプリ電池診断と言うのが存在するようですが、それらの機能を有効にしていませんか?継続利用するつもりのアプリを勝手に停めるような携帯の節電機能は多いですよ。 また、使っているアプリの名称はなんですか?アプリの正確な名称を書いて下さい。
3580日前view34
全般
41
Views
質問者が納得Dドライブがないということは,リカバリエリアも消してしまっている可能性があります。 ディスクの管理で見るとよいでしょう。 リカバリエリアがなければ,消してしまっていると思います。 不思議なのはリカバリエリアもないのに,リカバリディスクを作成できたということ。 リカバリメディアはここから購入できます。 http://121ware.com/qasearch/1007/app/servlet/qadoc?QID=008030#a02 リカバリメディアがあるとします。 電源を入れてすぐディスクを入れるとのこ...
3611日前view41
全般
67
Views
質問者が納得結論から言えば使えます。 しかしマイクはちょっと チョイスミスですね。 それはただのカラオケマイクですから。 まぁ歌を録るわけじゃないし 大丈夫でしょうけど。 生放送機ならオススメは TASCAM US-322ですね。 主に歌い手や歌枠の生主向けですが 放送中にBGMを流せるのは勿論 声にエフェクトをかけれます。 あと、このインターフェースには コンデンサマイク用の ファンタム電源がついてます。 プロ音響規格のダイナミックマイクなら 誤ってファンタム電源を かけてしまっても安全な回路が 施されていますが、...
3677日前view67
全般
76
Views
質問者が納得ニコンのコマンダーですとSU-800ですね。 元々マクロツインライト用のコマンダーなので、赤外通信の飛びは非常に良くないです。 YONGNUOのTTLラジオスレーブは最近ニコン用が出てきましたが、機種によってはかなり動作が怪しいようですのであまりお勧めできません。 そもそも、この手の海外製品は大半が日本国内の電波法に準拠していない(技適マークを取得していない)ので、厳密に言えば使用が違法な製品です。 販売すること自体は違法でないことと価格が極端に安いことで、近年は多く出回っていますが…。 合法的に最も確実...
3699日前view76

取扱説明書・マニュアル

661view
http://www.nttdocomo.co.jp/.../F-11D_J_01.pdf
68 ページ3.50 MB
もっと見る

関連製品のQ&A