[잡담] AI 활용하니 미치긴 했네

[루리웹-2028067802]

엑셀 잘 쓸 줄 모르는 사람인데

AI 물어보니 매크로 짜서 수정하는법 알려주네

Sub ChangeSerialNumbers()
    Dim i As Long
    Dim n As Long
    n = 1 '시작 숫자
    
    '1행부터 마지막 행까지 56행 간격으로 반복
    For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row Step 56
        '기존의 "1)" 부분을 "숫자)"로 교체
        Cells(i, 1).Value = Replace(Cells(i, 1).Value, "1)", n & ")")
        n = n + 1 '숫자 1씩 증가
    Next i
End Sub

코드의 ㅋ자도 모르는 사람도 쓸 수 있게 해주는 AI 대단해!

사실 코드인지 아닌지도 모름 ㅋㅋ

[나이트위시]

원래 이런 목적으로 사용하려고 개발한 거긴 함

[Rituals]

회사에서 코파일럿 쓰는데, 엑셀 vb스크립트 짜주는거는 편하더라