πŸ“˜ Programming 92

[Excel VBA] 였늘 λ‚ μ§œ, μ‹œκ°„μœΌλ‘œ 파일 이름 μ €μž₯ν•˜κΈ°

'Excel 2016' κΈ°μ€€μœΌλ‘œ μž‘μ„±λœ κΈ€μž…λ‹ˆλ‹€. VBA(Visual Basic for Application)λŠ” μ—‘μ…€μ—μ„œ μ‚¬μš©ν•  수 μžˆλŠ” μ‚¬μš©μž μ •μ˜ ν•¨μˆ˜λ₯Ό κ΅¬ν˜„ν•  λ•Œ μ‚¬μš©ν•©λ‹ˆλ‹€. 자주 μ‚¬μš©ν•˜λŠ” κΈ°λŠ₯κ³Ό ν•¨μˆ˜λ₯Ό μ†Œκ°œν•©λ‹ˆλ‹€. 였늘 λ‚ μ§œ, μ‹œκ°„μœΌλ‘œ 파일 이름 μ €μž₯ν•˜κΈ° 파일 이름을 μ‹œκ°„ κ°œλ…μœΌλ‘œ μ €μž₯ν•˜κΈ° μœ„ν•œ λ°©λ²•μž…λ‹ˆλ‹€. 1) 였늘 λ‚ μ§œλ‘œ μ €μž₯ν•˜κΈ° (2020-10-29.xlsm) Sub DaySave() Dim fileName fileName = Format(Date, "yyyy/mm/dd") ActiveWorkbook.SaveAs fileName:="C:\Users\kumc\Desktop\" & fileName & ".xlsm", _ FileFormat:=xlOpenXMLWorkbookMacroEnabled,..

[Excel VBA] VBA둜 μžλ™ μ €μž₯ κΈ°λŠ₯ κ΅¬ν˜„ν•˜κΈ° (μ‹œκ°„ 간격 지정 κΈ°λŠ₯)

'Excel 2016' κΈ°μ€€μœΌλ‘œ μž‘μ„±λœ κΈ€μž…λ‹ˆλ‹€. VBA(Visual Basic for Application)λŠ” μ—‘μ…€μ—μ„œ μ‚¬μš©ν•  수 μžˆλŠ” μ‚¬μš©μž μ •μ˜ ν•¨μˆ˜λ₯Ό κ΅¬ν˜„ν•  λ•Œ μ‚¬μš©ν•©λ‹ˆλ‹€. 자주 μ‚¬μš©ν•˜λŠ” κΈ°λŠ₯κ³Ό ν•¨μˆ˜λ₯Ό μ†Œκ°œν•©λ‹ˆλ‹€. μžλ™ μ €μž₯ κΈ°λŠ₯ μ—‘μ…€ μž‘μ—… 쀑 μžλ™μœΌλ‘œ ν•΄λ‹Ή λ¬Έμ„œλ₯Ό μ €μž₯ν•  수 μžˆλŠ” κΈ°λŠ₯을 κ΅¬ν˜„ν•˜μ—¬ 사고λ₯Ό 방지할 수 μžˆλ„λ‘ ν•©λ‹ˆλ‹€. Public Runwhen Sub Auto_Open() Call Run End Sub Public Sub Run() Runwhen = Now + TimeValue("00:10:00") On Error Resume Next Application.OnTime Runwhen, "Run" DoEvents ThisWorkbook.Save On Error GoTo 0 End Sub..

[Excel VBA] λ³€μˆ˜ μ„ μ–Έ 및 μ΄ˆκΈ°ν™” 방법

'Excel 2016' κΈ°μ€€μœΌλ‘œ μž‘μ„±λœ κΈ€μž…λ‹ˆλ‹€. VBA(Visual Basic for Application)λŠ” μ—‘μ…€μ—μ„œ μ‚¬μš©ν•  수 μžˆλŠ” μ‚¬μš©μž μ •μ˜ ν•¨μˆ˜λ₯Ό κ΅¬ν˜„ν•  λ•Œ μ‚¬μš©ν•©λ‹ˆλ‹€. 자주 μ‚¬μš©ν•˜λŠ” κΈ°λŠ₯κ³Ό ν•¨μˆ˜λ₯Ό μ†Œκ°œν•©λ‹ˆλ‹€. λ³€μˆ˜ μ„ μ–Έ 방법 - Dim Sub 맀크둜1() Dim a a = 100 Cells(2, 2).Value = a End Sub λ³€μˆ˜λ₯Ό μ •μ˜ν•  λ•Œ, 'Dim λ³€μˆ˜λͺ…' ν˜•νƒœλ‘œ μ„ μ–Έν•©λ‹ˆλ‹€. μœ„μ™€ 같이 μ†ŒμŠ€μ½”λ“œλ₯Ό μž‘μ„±ν•˜κ³  맀크둜λ₯Ό μ‹€ν–‰ν•΄λ΄…μ‹œλ‹€. μœ„λŠ” μ‹€ν–‰ κ²°κ³Όμž…λ‹ˆλ‹€. λ³€μˆ˜ a에 μ €μž₯된 μ •μˆ˜ 100이 B2에 좜λ ₯λ˜μ—ˆμŠ΅λ‹ˆλ‹€. Sub 맀크둜1() Dim a, b a = 100 Cells(2, 2).Value = a b = 300 Cells(2, 3).Value = b End Sub λ³€μˆ˜λŠ” μ—¬λŸ¬κ°œ μ •μ˜..

[Excel VBA] λ¬Έμžμ—΄ μ“°κΈ°

'Excel 2016' κΈ°μ€€μœΌλ‘œ μž‘μ„±λœ κΈ€μž…λ‹ˆλ‹€. VBA(Visual Basic for Application)λŠ” μ—‘μ…€μ—μ„œ μ‚¬μš©ν•  수 μžˆλŠ” μ‚¬μš©μž μ •μ˜ ν•¨μˆ˜λ₯Ό κ΅¬ν˜„ν•  λ•Œ μ‚¬μš©ν•©λ‹ˆλ‹€. 자주 μ‚¬μš©ν•˜λŠ” κΈ°λŠ₯κ³Ό ν•¨μˆ˜λ₯Ό μ†Œκ°œν•©λ‹ˆλ‹€. λ¬Έμžμ—΄ Sub macro1() Cells(1, 1).Value = "ν•˜μ΄λ£½" End Sub μœ„ μ†ŒμŠ€μ½”λ“œλŠ” μ…€ A1의 값을 "ν•˜μ΄λ£½"으둜 λ°”κΎΈλŠ” μ½”λ“œμž…λ‹ˆλ‹€. μœ„μ™€ 같이 λ¬Έμžμ—΄μ„ μ‚¬μš©ν•˜κΈ° μœ„ν•΄μ„œλŠ” μŒλ”°μ˜΄ν‘œλ₯Ό μ‚¬μš©ν•˜μ—¬ ν•©λ‹ˆλ‹€. μž‘μ€ λ”°μ˜΄ν‘œλŠ” λΆˆκ°€λŠ₯ν•©λ‹ˆλ‹€. 맀크둜λ₯Ό μ‹€ν–‰ν•˜λ©΄ μœ„μ™€ 같이 λ‚˜νƒ€λ‚©λ‹ˆλ‹€.

[Excel VBA] Cells, Value - νŠΉμ • μ…€ κ°’ μ°Έμ‘° 및 λ³€κ²½ 방법

'Excel 2016' κΈ°μ€€μœΌλ‘œ μž‘μ„±λœ κΈ€μž…λ‹ˆλ‹€. VBA(Visual Basic for Application)λŠ” μ—‘μ…€μ—μ„œ μ‚¬μš©ν•  수 μžˆλŠ” μ‚¬μš©μž μ •μ˜ ν•¨μˆ˜λ₯Ό κ΅¬ν˜„ν•  λ•Œ μ‚¬μš©ν•©λ‹ˆλ‹€. 자주 μ‚¬μš©ν•˜λŠ” κΈ°λŠ₯κ³Ό ν•¨μˆ˜λ₯Ό μ†Œκ°œν•©λ‹ˆλ‹€. νŠΉμ • μ…€ κ°’ λ³€κ²½ Cellsλ₯Ό μ‚¬μš©ν•˜λ©΄ νŠΉμ • μ…€ 값을 μ°Έμ‘°ν•˜κ³  λ³€κ²½ν•  수 μžˆμŠ΅λ‹ˆλ‹€. Cells( ν–‰, μ—΄ ) 예λ₯Ό λ“€μ–΄, A1의 μ…€ 값을 μ°Έμ‘°ν•˜κ³  μ‹Άλ‹€λ©΄ Cells(1, 1) E2의 μ…€ 값을 μ°Έμ‘°ν•˜κ³  μ‹Άλ‹€λ©΄ Cells(2, 5)둜 μ§€μ •ν•©λ‹ˆλ‹€. κ°„λ‹¨ν•˜κ²Œ μƒκ°ν•˜λ©΄ Y좕에 μ¨μžˆλŠ” μˆ«μžκ°€ μ•žμ—! β€» 주의 : μœ„μ™€ 같은 였λ₯˜κ°€ λ‚˜νƒ€λ‚œλ‹€λ©΄ 인덱슀 였λ₯˜μž…λ‹ˆλ‹€. ν”„λ‘œκ·Έλž˜λ° μ’€ ν•΄λ³Έ μ‚¬λžŒμ΄λΌλ©΄ 인덱슀 μ‹œμž‘μ€ 0이 ꡭ룰이라 μƒκ°ν•˜κΈ° λ•Œλ¬Έμ— ν—·κ°ˆλ¦΄ 수 있음! μ—¬κΈ΄ 1λΆ€ν„°! Sub 맀크둜1() Cells(1..