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

エクセルマクロで注文書作成以前にこちらの質問の内容で、excelのマ...

エクセルマクロで注文書作成以前にこちらの質問の内容で、excelのマクロを使って注文書作成が出来るとあったので、早速作ってみました。しかし、1品番ごとに注文書が作成してしまい、出来れば仕入先ごとに1枚の注文書を作成したいのです。1枚の注文書のフォーマットには8品番入れることが出来るので、9品番目からは新しい注文書が出来ると非常に楽になります。しかしマクロは初心者のため、文面の意味も分からず困っています。いい方法はないでしょうか?今、一覧というシートに仕入先NO.、仕入先名、品番、数量、注文書作成日、納品先NO.、希望納期という内容で、入力しています。仕入先NO.・仕入先名・作成日は1箇所なのでいいのですが、残りの項目は仕入先が同じ場合が多いです。今、登録されている文面を載せますので、どこをどのように直せばいいか分かる方がいらっしゃれば教えていただけませんか?For Each セル In Selection 注シト.Range("f13").Value = 自シト.Range("D" & セル.Row).Value 注シト.Range("a13").Value = 自シト.Range("E" & セル.Row).Value 注シト.Range("e13").Value = 自シト.Range("g" & セル.Row).Value 注シト.Range("h13").Value = 自シト.Range("h" & セル.Row).Value 注シト.Copy ActiveWorkbook.SaveAs パス & セル.Value & "注文書.xls" ActiveWorkbook.Close Next
Yahoo!知恵袋 5624日前
コメントする
お気に入り
1
質問者が選んだベストソリューション
8件ごとのループを作ればいいのではループ(シート)のループ(8件の)でもいいし上記のは1シート、1件のループなので、そうなります
Yahoo!知恵袋 5609日前
シェア
 
コメントする
 

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

Share (facebook)
その他の解決方法を知っていますか?
回答する
全般
132
Views
質問者が納得> B12で何も選択していない(空白)ときにF13に0が表示しています。文字列なら「=B12&""」とすればいいはずです。> またN17にも表示形式をユーザー定義で「#」もしくは「#,##0;-#,##0;;」とすればいいでしょう。
4757日前view132
全般
119
Views
質問者が納得そのサイト見ましたがコードの下に書かれていたMS-IMEをONにする操作し忘れていませんか?
4795日前view119
全般
134
Views
質問者が納得2つ考えられます。BIOS設定後Saveしていないか、マザーボードのボタン電池が消耗していて、設定した内容が保存できていない、かです。BIOS設定画面でカレンダーと時計の表示で確認できます。カレンダーと時計を合わせて一旦Saveして下さい。再度BIOS設定画面を開いて下さい。カレンダーと時計がずれていれば、ボタン電池の消耗です。電池を交換して下さい。
4808日前view134
全般
183
Views
質問者が納得Mac:1. shift + command + 3 → デスクトップ2. Photo Booth で撮るWindows:1. fn + 左shift + F11 → クリップボード (ペイントにCtrl+Vで貼り付けてください)2. わかりません。
4809日前view183
全般
120
Views
質問者が納得◆別のシートに表示するようにしました◆なお、「1月12日」は順次上の行に入力するものとします◆必要に応じて、行の挿入をして、追加入力するものとします★Sheet2の式B3=COUNTIF(INDIRECT("Sheet1!B"&MATCH(0,INDEX(0/(Sheet1!$B$1:$B$20<>""),),0)&":F"&MATCH(0,INDEX(0/(Sheet1!$B$1:$B$20<>&q...
4878日前view120

取扱説明書・マニュアル

2245view
http://media.generationmp3.com/.../pasen-f13-italien.pdf
もっと見る