'Excel 2016' ๊ธฐ์ค์ผ๋ก ์์ฑ๋ ๊ธ์ ๋๋ค. VBA(Visual Basic for Application)๋ ์์ ์์ ์ฌ์ฉํ ์ ์๋ ์ฌ์ฉ์ ์ ์ ํจ์๋ฅผ ๊ตฌํํ ๋ ์ฌ์ฉํฉ๋๋ค. ์์ฃผ ์ฌ์ฉํ๋ ๊ธฐ๋ฅ๊ณผ ํจ์๋ฅผ ์๊ฐํฉ๋๋ค.
ํน์ ์ ๊ฐ ๋ณ๊ฒฝ
Cells๋ฅผ ์ฌ์ฉํ๋ฉด ํน์ ์ ๊ฐ์ ์ฐธ์กฐํ๊ณ ๋ณ๊ฒฝํ ์ ์์ต๋๋ค.
Cells( ํ, ์ด )
์๋ฅผ ๋ค์ด,
A1์ ์ ๊ฐ์ ์ฐธ์กฐํ๊ณ ์ถ๋ค๋ฉด Cells(1, 1)
E2์ ์ ๊ฐ์ ์ฐธ์กฐํ๊ณ ์ถ๋ค๋ฉด Cells(2, 5)๋ก ์ง์ ํฉ๋๋ค.
๊ฐ๋จํ๊ฒ ์๊ฐํ๋ฉด Y์ถ์ ์จ์๋ ์ซ์๊ฐ ์์!
โป ์ฃผ์ : ์์ ๊ฐ์ ์ค๋ฅ๊ฐ ๋ํ๋๋ค๋ฉด ์ธ๋ฑ์ค ์ค๋ฅ์ ๋๋ค. ํ๋ก๊ทธ๋๋ฐ ์ข ํด๋ณธ ์ฌ๋์ด๋ผ๋ฉด ์ธ๋ฑ์ค ์์์ 0์ด ๊ตญ๋ฃฐ์ด๋ผ ์๊ฐํ๊ธฐ ๋๋ฌธ์ ํท๊ฐ๋ฆด ์ ์์! ์ฌ๊ธด 1๋ถํฐ!
Sub ๋งคํฌ๋ก1()
Cells(1, 1).Value = 100
Cells(2, 5).Value = "abc"
End Sub
์ ์์ค์ฝ๋์ ๊ฐ์ด ์์ฑํด๋ด ์๋ค.
์์ฑ์ ํ๊ณ ๋์ ๋งคํฌ๋กค ์คํํด๋ด ์๋ค. ์คํ๋ฐฉ๋ฒ์ ๋งคํฌ๋ก ์์ฑ ์ ์ง์ ํ ๋จ์ถํค๋ฅผ ๋๋ฅด๊ฑฐ๋
์ฝ๋ ํธ์ง๊ธฐ ์ฐฝ์์ 'F5'๋ฅผ ๋๋ฌ ์คํ์ด ๊ฐ๋ฅํฉ๋๋ค.
A1๊ณผ E2์ ์ ๊ฐ์ด ๋ฐ๋ ๊ฒ์ ๋ณผ ์ ์์ต๋๋ค! ์ ์ ํํ๋ ๋ฌธ์ ํํ ๋ชจ๋ ๋ณ๊ฒฝ์ด ๊ฐ๋ฅํฉ๋๋ค.
๋จ, ๋งคํฌ๋ก๋ ์คํ์ทจ์( Ctrl+Z ) ๋ช ๋ น์ด ๋์ง ์์ต๋๋ค!
'๐ Programming > Excel VBA' ์นดํ ๊ณ ๋ฆฌ์ ๋ค๋ฅธ ๊ธ
[Excel VBA] VBA๋ก ์๋ ์ ์ฅ ๊ธฐ๋ฅ ๊ตฌํํ๊ธฐ (์๊ฐ ๊ฐ๊ฒฉ ์ง์ ๊ธฐ๋ฅ) (0) | 2020.10.29 |
---|---|
[Excel VBA] ๋ณ์ ์ ์ธ ๋ฐ ์ด๊ธฐํ ๋ฐฉ๋ฒ (0) | 2020.10.29 |
[Excel VBA] ๋ฌธ์์ด ์ฐ๊ธฐ (0) | 2020.10.28 |
[Excel VBA] ๋งคํฌ๋ก ํ์ผ ์ฌ๋ฐ๋ฅด๊ฒ ์ ์ฅํ๊ธฐ (0) | 2020.10.28 |
[Excel VBA] ์๋์ผ๋ก ๋์ํ๋ ๋งคํฌ๋ก ์์ฑ ๋ฐฉ๋ฒ (0) | 2020.10.28 |