-2

(Microsoft Excel 2010 で) 在庫管理システムを開発しようとしていますが、問題が発生しました。

部品入荷ワークシートと、保管場所ごとに別のワークシートがあります。(うち5人)

部品受領ページで、部品名、数量、部品の請求書が経理ファイルに追加されているかどうかを示すチェックボックス、および部品の保管場所 (保管場所) の選択をドロップダウンとして入力します。選択可能なリスト。

RELEVANT ワークシート (ユーザーが選択した保管場所) を更新し、送信された詳細をそのワークシートに追加するデータ入力シート (部品入荷シート) に送信ボタンを作成したいと考えています。詳細を追加する方法は知っていますが (私は思います)、私の質問は、選択した保存場所/ワークシートに詳細を追加するにはどうすればよいですか?

これまでのところ、マクロしか実際に使用しておらず、VBA に関する知識もかなり限られていますが、機能すると思われるものは何でも喜んで試してみます。それが理にかなっていることを願っています。どんな助けでも大歓迎です！ありがとうトビー

4

1 に答える 1

0

セル値またはセルの範囲をあるシートから別のシートに転送する簡単な例です。

ワークシートに commandButton を作成し、次のマクロをアタッチします。

Sub TransferData() 
    Dim sht1 as Worksheet
    Dim sht2 as Worksheet

    Set sht1 = ThisWorkbook.Sheets("Parts Incoming")  '<-- modify as needed'
    Set sht2 = ThisWOrkbook.Sheets("Storage Location") '<-- modify as needed'

    'Example of placing cell value from B16 on Parts Incoming in the cell A1 on the storage location sheet.'
    sht2.Range("A1") = sht1.Range("B16") 

    'Example of transfering data from a Range of cells to another range of cells on a different worksheet:'
    sht2.Range("A1:A50") = sht1.Range("E50:E100")


    ' you will need to modify or add to this to transfer data from different places '

End Sub
于 2013-03-29T15:29:47.430 に答える