-1

ボタンを押すたびに、あるシートから情報を読み取り、(その情報に従って) 別のシートのセルに特定の値を入力する Excel スプレッドシートを作成しようとしています。

例えば：

生徒がテストの回答を入力します。Excel ドキュメントは、データベースに対してすべての回答をチェックし、スコアを計算し、それらを特定の目的に関連付けます (私はすでにそれを処理しています)。

次に、生徒は「更新」ボタンを押します。プログラムは学生の名前 (行 # を提供) と彼らが受けたテスト (列を提供します。特定の列に文字を入れる方法がまだわからないので、それも役に立ちます) を読み取ります。そして、そのセルを学生のスコアで更新します。

どうすればいいですか？

4

1 に答える 1

0

わかりました、あなたが言ったようなコードのようなものです。私は以前にそれをやったことがあります。これは私があなたに答えることができます。しかし、私はあなたの努力をまったく見ていないからです。だから私はあなたに私のコードを与えて説明するだけです、そしてあなたはそれをあなたの質問コードに変更する必要があります. Ok？

      c = TB1.Value >> (My textbox for user to fill in their name that same with the sheet row value)

    Cells.Find(What:=c, After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
            xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
            , SearchFormat:=False).Activate
        myRow = ActiveCell.Row
        rtb = myRow >> My Row XX Value just like you said want to know at what row hold that value.

    e = coltb.Text >> (My textbox for user to fill in their date value that will be find in column)
    Cells.Find(What:=e, After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
        MatchCase:=True, SearchFormat:=True).Activate
        myColumn = ActiveCell.Column
        ctb = myColumn >>> (My Column XX value just like for know what is the column that hold the value)

Worksheets("Sheet1").Cells(rtb, ctb) = Val(Score) > Your RTB(Row value) + CTB(Column Value) then the score of your test.

こんな感じかもしれませんよね？このコードは VBA で使用されているため、VBA を使用してタグを作成します

希望は役に立ちます

于 2013-03-28T01:23:48.173 に答える