Calender

S M T W T F S
1234567
891011121314
15161718192021
22232425262728
293031    
<< March 2020 >>

Categories

Archives

Recent Entries

中学生のためのExcel VBA

3-15 会計金額挿入(6)テキストボックス規定値

JUGEMテーマ:Office VBA

 

g = 5
r = 1
  With Worksheets("data")
       For r =1 to 3
    Controls("gaku" & r).Value = .Cells(g, "b")
        Controls("kyou" & r).Value = .Cells(g, "d")
    Controls("sono" & r).Value = .Cells(g, "e") 
       g = g + 1
    Next r
        ptz.Text = .Cells(5, "c")
  End With
 

  • 2019.06.30 Sunday
  • 18:53

Comment
Send Comment