Calender

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

Categories

Archives

Recent Entries

中学生のためのExcel VBA

4-7 請求書長子(1)長子を数値に

JUGEMテーマ:Office VBA

 

基表加工に長子を数字に置き換えるボタンを作成
Call 電話ソート
Call hani
    For g = 4 To gyou
        If Cells(g, "o").Value <> Cells(g + 1, "o").Value Then
            Cells(g, "e").Value = "○"
            Cells(g, "y") = 2
        Else
            Cells(g, "e").Value = ""
           Cells(g, "y") = 1
         End If
    Next g
Call 年組名前ソート

  • 2019.06.18 Tuesday
  • 22:54

Comment
Send Comment