본문 바로가기

프로그램이야기54

[엑셀 VBA] 엑사남 9강 #EVENT설정 [엑셀 VBA] 엑사남 9강 #EVENT설정 늦은 퇴근시간을 앞당기기 위해 공부합니다^^ 몇번을 도전하다 실패한 엑셀VBA를 이번에는 초급을 넘어서보려고 합니다. #학습내용(1) Private Sub Workbook_Open() MsgBox "안녕하세요. 반가워요^^" End Sub #학습내용(2) Private Sub Workbook_BeforeClose(Cancel As Boolean) MsgBox "정말닫을꺼야??" End Sub #학습내용(3) Private Sub Workbook_BeforeClose(Cancel As Boolean) If MsgBox("정말닫을꺼야??", vbYesNo) = vbNo Then MsgBox " 그래 우리 더하자" Cancel = True End If End Sub.. 2022. 6. 15.
[엑셀 VBA] 엑사남 8강 #지우기 기능 [엑셀 VBA] 엑사남 8강 #지우기 기능 늦은 퇴근시간을 앞당기기 위해 공부합니다^^ 몇번을 도전하다 실패한 엑셀VBA를 이번에는 초급을 넘어서보려고 합니다. #학습내용(1) Sub Test01() Range("F7:L26").Clear End Sub #학습내용(2) Sub Test02() Range("F7:L26").ClearContents End Sub #학습내용(3) Sub Test03() Range("7:26").Delete End Sub #학습내용(4) Sub Test04() Range("F7:L26").ClearFormats End Sub #학습내용(5) Sub Test05() Dim i As Long For i = 26 To 7 Step -1 If Cells(i, "G") = "남" The.. 2022. 6. 14.
[엑셀 VBA] 엑사남 7강 #복사 붙혀넣기 [엑셀 VBA] 엑사남 7강 #복사 붙혀넣기 늦은 퇴근시간을 앞당기기 위해 공부합니다^^ 몇번을 도전하다 실패한 엑셀VBA를 이번에는 초급을 넘어서보려고 합니다. #학습내용(1) Sub Test01() Range("O6").CurrentRegion.Clear Range("F6:L10").Copy Range("O6").PasteSpecial Range("F6").Select Application.CutCopyMode = False End Sub #학습내용(2) Sub Test02() Range("F6").CurrentRegion.Copy Range("F6").PasteSpecial xlPasteValues Range("F6").Select Application.CutCopyMode = False End S.. 2022. 6. 9.
[엑셀 VBA] 엑사남 6강 #셀을 변수로 사용 [엑셀 VBA] 엑사남 6강 #셀을 변수로 사용 늦은 퇴근시간을 앞당기기 위해 공부합니다^^ 몇번을 도전하다 실패한 엑셀VBA를 이번에는 초급을 넘어서보려고 합니다. #학습내용(1) Sub test01() Dim i As Long For i = 9 To Range("B2") If Range("G" & i) = Range("B3") And _ Range("H" & i) 2022. 6. 7.