Calender

S M T W T F S
    123
45678910
11121314151617
18192021222324
25262728293031
<< August 2019 >>

Categories

Archives

Recent Entries

中学生のためのExcel VBA

3-14 郵便番号と住所()テキストボックス

JUGEMテーマ:Office VBA

 

 

Call hani
    Cells(gyou + 1, "s").Value = TextBox1.Text
Cells(gyou + 1, "s").NumberFormatLocal = "000-0000"
Range("t4:x4").Copy
Cells(gyou + 1, "t").PasteSpecial (xlPasteFormulas)
Application.CutCopyMode = False
Cells(gyou + 1, "w").Value = ""
TextBox2.Text = Cells(gyou + 1, "x").Value

  • 2019.05.23 Thursday
  • 22:40

Comment
Send Comment