0

これは私の最初の vb コードです。名前以外は vb について何も知りませんでした。VBで変数を宣言するためにdimが使用されていることすら知りませんでした!!! バッチプロセスの作成を手伝ってください..

Excel シートを作成し、値をフラットから Excel シートにインポートし、電子メールの添付ファイルとして送信するバッチ プロセスを作成する必要があります。Excel シートには、最終受信者 (xyz@gmail.com) にメールを送信するためのコマンド ボタンも必要です。

フラットファイルの「id」フィールドに応じて、値をさまざまな列にインポートする必要があります。同じ ID を持つフラット ファイルに存在するすべての行は、1 つの Excel シートにインポートされます。この Excel シートは、メールに添付して送信されます。メール受信者はExcelを読み、ドロップダウンリストを使用してコメント（Excelの列）を入力し、保存してボタン（XYZに転送）をクリックして、保存されたExcelシートを最終受信者（xyz@gmail.com）に送信する必要がありますコメント。Excel シート、ボタン、およびボタン クリックでメールを送信するマクロの作成は、vb.net を使用して行います。インポートした名前空間を指定してください (VS 2008)

これをフラット ファイル データと見なします。 

abc cdsmdjn 1 337666746     
デフodkiejr 1 234585780   
ギ kdjfjfn 1 287474675   
jkl nfjjwke 2 455767875  
mno jfhfiee 3 039484764

値は、3 番目の列を使用して区切る必要があります。したがって、最初の 3 行は 1 つの Excel ワークブックに、4 行目は 2 番目のブックに、5 行目は 3 番目のブックに含まれます。

4

1 に答える 1

0

これは、マクロが割り当てられたボタンを作成する簡単な VBA コードです。このコードは、VB.net で動作するように簡単に変更できます。それが役に立てば幸い。

Sub CreateButton()

    Dim btn As button

    'create the button in the active sheet.
    'The 4 arguments are left, top, width and height --- i chose to base them off of cellular dimensions
    Set btn = ActiveSheet.Buttons.Add( _
        ActiveSheet.Columns(2).Left, _
        ActiveSheet.Rows(2).Top, _
        ActiveSheet.Columns(2).Width * 2, _
        ActiveSheet.Rows(1).Height * 2)

    'this is where you assing a macro to the btn
    btn.OnAction = "ShowMessageBox"

    'add a caption
    btn.Text = "Click Me"

    Set btn = Nothing

End Sub

Sub ShowMessageBox()

    MsgBox "Hello"

End Sub
于 2012-10-09T21:32:24.693 に答える