์๋นต์ ์ผ์ ๋ฐ๋ผ๋ด
์๋ค! Editor's Comments
์๋นต์ ์ผ์ ๋ฐ๋ผ๋ด
์๋ค!
|
|
|
๋น๊ฐ๋ฐ์์ AI๋ก ์ฝ๋ ์์ฑํ๊ธฐ ๋
ธํ์ฐ
|
|
|
์๋นต์ ์ผ ๋ฐ๋ฅด๋ ๊ฒ ์ด๋ ๊ฒ ์ด๋ ค์ด ๊ฑฐ์์ด? |
|
|
์๋ฒ์ง๊ป์ ์ผ๋์ดํ๋ก ์๋นต์ ๋ชจ์๋ฆฌ์ ๋
์ฝฉ ์ผ์ ๋ฐ๋ฅด๊ณ ์์ต๋๋ค. ๋
์ฝฉ์ผ ์๋์์น ๋ง๋ค๊ธฐ๊น์ง์ ํ๋ ํ๋ํ๋๋ฅผ ์ค๋ช
ํ๋ ์ง์๋ฌธ์ ๋ธ์ด ์์ฑํ๊ณ , ๊ทธ๊ฒ์ ์๋น ๊ฐ ์คํํ๋ ๋์ด์ ์ฅ๋ฉด ์ค ํ๋์ธ๋ฐ์. ๋ธ์ด ์ง์ํ ๋ด์ฉ์ ๋ค์๊ณผ ๊ฐ์์ต๋๋ค.
"Spread your scoop of peanut butter onto one of your pieces of bread with the knife"๋
์ฝฉ๋ฒํฐ ํ ์ค์ฟฑ์ ์นผ๋ก ๋นต ํ ์กฐ๊ฐ์ ํด ๋ฐ๋ฆ
๋๋ค.
์ด๋ ์ฝ๋๋ฅผ ์์ฑํ๋ ๊ณผ์ ์ ๊ดํตํฉ๋๋ค. ์ฝ๋ฉ์ ๊ฒฐ๊ณผ๋ฌผ์ด ๋ด๊ฐ ์๋ํ ๊ฒฐ๊ณผ๋ฌผ๊ณผ ๋ค๋ฅด๊ฒ ๋์ํ๋ ์ผ์ ๋น์ผ๋น์ฌํ์ง์.
์์ฑํ AI๊ฐ ๋ฑ์ฅํ๋ฉฐ ๋น๊ฐ๋ฐ์์ ํ๋ก๊ทธ๋๋ฐ ์ง์
์ฅ๋ฒฝ์ด ๋งค์ฐ ๋ฎ์์ก์ต๋๋ค. ๊ทธ๋ผ์๋ ๋ถ๊ตฌํ๊ณ , ์์ ๊ฐ์ ๋ฌธ์ ๋ ์ฌ์ ํ ๋ฐ์ํ ์ ์์ต๋๋ค. ์๋ํ๋ฉด ๋ด๊ฐ AI์๊ฒ ์ง์ํ๋ ๊ณผ์ ์์ ์ํต์ ์ค๋ฅ๊ฐ ๋ฐ์ํ ์ ์๊ธฐ ๋๋ฌธ์
๋๋ค. ์ด๋ฒ ๊ธ์์๋ ์ด๋ฌํ ์๋ฌ๋ฅผ ์ค์ด๊ณ , ์ค๋ น ๋ฐ์ํ๋๋ผ๋ ํด๊ฒฐํด ๋๊ฐ ์ ์๋ ๋
ธํ์ฐ๋ฅผ ์๊ฐํ๊ณ ์ ํฉ๋๋ค.
์ฐธ๊ณ ๋ก ์ ๋ ๋น๊ฐ๋ฐ์์
๋๋ค. C#์ด๋ผ๋ ์ธ์ด๋ก ํ๋ก๊ทธ๋๋ฐ์ ๋ํด 3๊ฐ์ ์ ๋ ๊ณต๋ถํ๊ธฐ์, ์์ฃผ ๊ธฐ์ด์ ์ธ ์ง์์ ๊ฐ์ง๊ณ ์์ต๋๋ค. ๊ทธ๋ผ์๋ ๋ชจ๊ธฐ์
์์ AI๋ฅผ ํ์ฉํ ๋ฆฌ๋์ญ ํ๊ฐ ๋ฆฌํฌํธ ์์ฑ์ ์๋ํํ๋ ํ๋ก์ ํธ๋ฅผ ์ฑ์ฌํ ๊ฒฝํ์ด ์์ต๋๋ค. ๋ฌธ๋ฒ์กฐ์ฐจ ๋ชจ๋ฅด๋ Excel VBA๊ณผ Python์ ์ฌ์ฉํด์ ๋ง์ด์ฃ . ChatGPT์ Claude์ ๋์์ด ์์๊ธฐ์ ๊ฐ๋ฅํ๋ ์ผ์ด์์ง๋ง, ๊ทธ ๊ณผ์ ์ด ์ํ์น๋ ์์์ต๋๋ค.
์ด ๋์ ๊ฒฝํ์ ํตํด ๋ฐฐ์ด ๋
ธํ์ฐ๋ "ํ์คํฌ๋ฅผ ์ชผ๊ฐ์ด ์ฌ๋ฌ๊ฐ์ ํจ์๋ฅผ ๋ง๋ค๊ธฐ"์
๋๋ค. AI๋ก ์ฝ๋๋ฅผ ์์ฑํ ๋ ํ ๋ฒ์ ๋ง์ ๊ธฐ๋ฅ์ ์์ฒญํ๋ ๋์ , ์์ ๊ธฐ๋ฅ์ ํ๋ ํจ์ ์ฝ๋๋ฅผ ์ฌ๋ฌ ๊ฐ๋ฅผ ์์ฑํ๋ ๊ฒ๋๋ค. ์ด๊ฒ ๋ฌด์จ ์๋ฏธ์ธ์ง, ์ ๊ทธ๋์ผ ํ๋์ง, ์ด๋ป๊ฒ ํ๋์ง๋ฅผ ์์ธํ ์ด์ผ๊ธฐํด ๋ณด๊ฒ ์ต๋๋ค.
ํ์คํฌ๋ฅผ ์ชผ๊ฐ๋ ๊ฒ ๋ญ๊น? |
|
|
๊ณผ์ผ ์ค๋ฌด๋๋ฅผ ๋ง๋๋ ๊ณผ์ ์ ์์ํด ๋ด
์๋ค.
- ์ค๋น ๋จ๊ณ
- ๋ ์ํผ ์ ํ: ์ฌ์ฉํ ๊ณผ์ผ๊ณผ ์ฌ๋ฃ(์๊ฑฐํธ, ์ฐ์ , ๊ฟ ๋ฑ)๋ฅผ ๊ฒฐ์ ํฉ๋๋ค.
- ๋๊ตฌ ์ค๋น: ๋ธ๋ ๋, ์นผ, ๋๋ง, ๊ณ๋์ปต, ์ปต ๋ฑ์ ์ค๋นํฉ๋๋ค.
- ์ฌ๋ฃ ์์ง
- ๊ณผ์ผ ์ธ์ฒ: ํ๋ฅด๋ ๋ฌผ์ ๊ณผ์ผ์ ๊นจ๋์ด ์ป์ต๋๋ค.
- ๊ป์ง ์ ๊ฑฐ: ๋ฐ๋๋, ๋ง๊ณ ๋ฑ ๊ป์ง์ด ํ์ํ ๊ณผ์ผ์ ๊ป์ง์ ๋ฒ๊น๋๋ค.
- ๊ณผ์ผ ์๋ฅด๊ธฐ: ๊ณผ์ผ์ ๋ธ๋ ๋์ ์ฝ๊ฒ ๊ฐ๋ฆด ์ ์๋๋ก ์ ๋นํ ํฌ๊ธฐ๋ก ์๋ฆ
๋๋ค.
- ์ฌ๋ฃ ๊ณ๋ ๋ฐ ์ถ๊ฐ
- ๊ณผ์ผ ๊ณ๋: ์ํ๋ ๋น์จ๋ก ๊ณผ์ผ์ ์ค๋นํฉ๋๋ค.
- ๋ถ๊ฐ ์ฌ๋ฃ ์ถ๊ฐ: ์๊ฑฐํธ, ์ฐ์ , ๊ฟ, ์ผ์ ๋ฑ ์ถ๊ฐํ ์ฌ๋ฃ๋ฅผ ๊ณ๋ํด ์ค๋นํฉ๋๋ค.
- ๋ธ๋ ๋ฉ
- ์ฌ๋ฃ ๋ฃ๊ธฐ: ๋ธ๋ ๋์ ๊ณผ์ผ๊ณผ ๋ถ๊ฐ ์ฌ๋ฃ๋ฅผ ๋ชจ๋ ๋ฃ์ต๋๋ค.
- ๊ฐ๊ธฐ: ๋ธ๋ ๋๋ฅผ ์๋์์ผ ๋ถ๋๋ฝ๊ณ ๊ณ ๋ฅด๊ฒ ๊ฐ๋ฆฝ๋๋ค. (30์ด~1๋ถ ์ ๋)
- ๋๋ ํ์ธ: ๋๋๊ฐ ๋๋ฌด ๋๋ฉด ์ฐ์ ๋ ๋ฌผ์ ์ถ๊ฐํ๊ณ , ๋๋ฌด ๋ฌฝ์ผ๋ฉด ์ผ์์ด๋ ๊ณผ์ผ์ ๋ ์ถ๊ฐํด ์กฐ์ ํฉ๋๋ค.
- ๋ด๊ธฐ ๋ฐ ๋ง๋ฌด๋ฆฌ
- ์ปต์ ๋ด๊ธฐ: ์์ฑ๋ ์ค๋ฌด๋๋ฅผ ์ปต์ ๋ฐ๋ฆ
๋๋ค.
- ์ฅ์: ๋ฏผํธ ์์ด๋ ๊ณผ์ผ ์กฐ๊ฐ์ผ๋ก ์ฅ์ํ ์ ์์ต๋๋ค.
- ์ฒญ์ ๋ฐ ์ ๋ฆฌ
- ๋ธ๋ ๋ ์ธ์ฒ: ๋ธ๋ ๋์ ์ฌ์ฉํ ๋๊ตฌ๋ฅผ ๊นจ๋์ด ์ป์ต๋๋ค.
- ์ ๋ฆฌ: ์ฌ์ฉํ ์ฃผ๋ฐฉ ๊ณต๊ฐ์ ์ ๋ฆฌํ๊ณ ๋ง๋ฌด๋ฆฌํฉ๋๋ค.
๊ณผ์ผ ์ค๋ฌด๋ ํ ์ ๋ง๋๋๋ฐ ํ ์ผ์ด ์ฐธ ๋ง์ฃ ? '๊ณผ์ผ ์ค๋ฌด๋ ๋ง๋ค๊ธฐ'๋ผ๋ ์ผ์ ์์ธํ ์ดํด๋ณด๋ ์ด๋ ๊ฒ๋ ํ ์ผ์ด ๋ง์ต๋๋ค. ์ ๋ ์ด๋ฅผ 'ํ์คํฌ๋ฅผ ์ชผ๊ฐ ๋ค'๋ผ๊ณ ํํํ ๊ฒ๋๋ค.
์ฝ๋๋ฅผ ์์ฑํ๋ ์ผ์ ์ปดํจํฐ๊ฐ ํด์ผํ ์ผ์ ์ปดํจํฐ์ ์ธ์ด๋ก ์ง์ํ๋ ์ผ์
๋๋ค. ์ง์๋ฅผ ์ ํํ๊ฒ ์ํ์ํค๊ธฐ ์ํด์๋ ์ด๋ ๊ฒ ํ์คํฌ๋ฅผ ์ชผ๊ฐ์ด ์์ธํ๊ฒ ์ค๋ช
ํด์ผ ํฉ๋๋ค. ๊ทธ๋ฐ๋ฐ ๋ณต์กํ ์์
์ผ ์๋ก ๋ ๋ง์ ํ์คํฌ๋ก ์ชผ๊ฐ์ง๋๋ฐ, ๊ทธ๋งํผ ์ฝ๋์ ๊ธธ์ด๊ฐ ๊ธธ์ด์ง๊ณ ์ด๋ ต๊ฒ ๋๊ปด์ง์ฃ . ์ด๋ฅผ ํด๊ฒฐํด ์ฃผ๋ ๊ฒ์ด 'ํจ์'์
๋๋ค.
ํจ์๋ ๋ฌด์์ธ๊ฐ?
ํจ์๋ฅผ ๊ฐ๋
์ ์ผ๋ก ์ค๋ช
ํ์๋ฉด "์
๋ ฅ๊ฐ์ ๋ฐ์ ์ผ์ ํ ๊ท์น์ด๋ ๊ณผ์ ์ ๊ฑฐ์ณ ๊ฒฐ๊ด๊ฐ์ ๋ด๋๋ ๋๊ตฌ"๋ผ๊ณ ํ ์ ์์ต๋๋ค. ์์๋ฅผ ๋ณด์๋ฉด ์ฝ๊ฒ ์ดํดํ์ค ์ ์์ต๋๋ค. |
|
|
'๊ณผ์ผ ์ค๋ฌด๋ ๋ง๋ค๊ธฐ' ๋ผ๋ ํจ์๊ฐ ์๋๋ฐ, ์ฌ๊ธฐ์ ๋ง๊ณ ์ ๋ธ๊ธฐ๋ฅผ ๋ฃ์๋๋ ๋ง๊ณ -๋ธ๊ธฐ ์ค๋ฌด๋๊ฐ ๋ง๋ค์ด์ก์ต๋๋ค. ๋ง์ฝ ์๋ฐ๊ณผ ์ฒด๋ฆฌ๋ฅผ ๋ฃ๋๋ค๋ฉด? ์๋ฐ-์ฒด๋ฆฌ ์ค๋ฌด๋๊ฐ ๋ง๋ค์ด์ง๊ฒ ์ฃ . ์ด๋ ์๋ฐ๊ณผ ์ฒด๋ฆฌ๊ฐ ์
๋ ฅ๊ฐ์ด๊ณ ์๋ฐ-์ฒด๋ฆฌ ์ค๋ฌด๋ค๊ธฐ ๊ฒฐ๊ด๊ฐ์
๋๋ค. ํจ์ ์์๋ ์๋ฐ๊ณผ ์ฒด๋ฆฌ๋ฅผ ๊ฐ์์ ์ปต ์์ ๋ด๋ ๋ฑ์ ๊ณผ์ ์ด ๋ด๊ฒจ ์์ง์.
์ด๋ฅผ ์ฝ๋๋ก ํํํ๋ค๋ฉด ์ด๋ ๊ฒ ํ ์ ์์ต๋๋ค. |
|
|
# ํจ์ ์์ : ๊ณผ์ผ ์ค๋ฌด๋ ๋ง๋ค๊ธฐ def make_smoothie(fruit1, fruit2): print(f"{fruit1}์ {fruit2}๋ฅผ ๋ฏน์๊ธฐ์ ๋ฃ์ต๋๋ค.") print("๋ฏน์๊ธฐ๋ฅผ ์๋์์ผ ์ฌ๋ฃ๋ฅผ ๊ฐ์์ค๋๋ค.") print("๋ฏน์๊ธฐ ์์ ์ค๋ฌด๋๋ฅผ ์ปต์ผ๋ก ์ฎ๊น๋๋ค.")
# ๋จ์ํ๊ฒ ์
๋ ฅ๊ฐ์ ์ฐ๊ฒฐํด ๊ฒฐ๊ณผ ์์ฑ smoothie_name = f"{fruit1}-{fruit2} ์ค๋ฌด๋"
return f"{smoothie_name}๊ฐ ์์ฑ๋์์ต๋๋ค!"
# ํจ์ ํธ์ถ: ์๋ฐ๊ณผ ์ฒด๋ฆฌ๋ฅผ ์
๋ ฅ result = make_smoothie("์๋ฐ", "์ฒด๋ฆฌ")
# ๊ฒฐ๊ณผ ์ถ๋ ฅ print(result) |
|
|
์ ์ฝ๋๋ make_soothie("์๋ฐ", "์ฒด๋ฆฌ")๋ผ๊ณ ํ ์ค๋ง ์
๋ ฅํ๋ฉด '์๋ฐ-์ฒด๋ฆฌ ์ค๋ฌด๋'๋ผ๋ ๊ฒฐ๊ณผ๋ฌผ์ ๋ง๋ค ์ ์๊ฒ ๋ฉ๋๋ค! ์ฌ๊ธฐ์ ("์๋ฐ", "์ฒด๋ฆฌ")์ฒ๋ผ ๊ดํธ ์์ ์
๋ ฅํ๋ ๊ฐ์ '๋งค๊ฐ๋ณ์'๋ผ๊ณ ๋ถ๋ฆ
๋๋ค. ๋ฏน์ ์์ ๊ณผ์ผ์ ์ง์ด๋ฃ๋ฏ์ด, ํจ์์ ๊ฐ์ ์ ๋ฌํ๋ ๊ฒ์ด์ฃ .
ํจ์ ๊ฐ๋
์ด ์ด์ ์กฐ๊ธ ์ดํด ๋์
จ์ฃ ? ์ด์ ๋ค์ ๋จ๊ณ๋ก ๋์ด๊ฐ๋ด
์๋ค.
ํ์คํฌ๋ฅผ ์ชผ๊ฐ์ด ํจ์ ๋ง๋ค๊ธฐ |
|
|
์ ์ด๋ฏธ์ง ๊ฐ ๋ฐ์ค ์์๋ ์๋ก ๋์ผํ ์์
์ ์ํํ๋ ์ฝ๋๊ฐ ์์ฑ๋์ต๋๋ค. ์ผ์ชฝ์ ํจ์๋ฅผ ์ฌ์ฉํ์ง ์์ ์ฝ๋์ด๊ณ , ์ค๋ฅธ์ชฝ์ ํจ์๋ฅผ ์ฌ์ฉํ ์ฝ๋์
๋๋ค. ์ฝ๋ ๊ธธ์ด๊ฐ ํ์ฐํ ์ฐจ์ด๊ฐ ๋์ฃ ?
๋ค์์ ์ ์ฝ๋๊ฐ ์ํํ ์์
์ ๋ํ ์ค๋ช
์
๋๋ค. |
|
|
'input' ์ํธ์ b2 ์
์ ๊ฐ์ 'report' ์ํธ์ box 1์ ์
๋ ฅํ๋ค. 'input' ์ํธ์ c2 ์
์ ๊ฐ์ 'report' ์ํธ์ box 2์ ์
๋ ฅํ๋ค. 'input' ์ํธ์ d2 ์
์ ๊ฐ์ 'report' ์ํธ์ box 3์ ์
๋ ฅํ๋ค. 'report' ์ํธ์ box 3์์ **์ผ๋ก ๋๋ฌ์ธ์ธ ํ
์คํธ๋ฅผ ๋นจ๊ฐ์ ์ฒ๋ฆฌํ๋ค. 'report' ์ํธ๋ฅผ PDF ํ์ผ๋ก ์ธ์ํ๋ค.
'input' ์ํธ์ b3 ์
์ ๊ฐ์ 'report' ์ํธ์ box 1์ ์
๋ ฅํ๋ค. 'input' ์ํธ์ c3 ์
์ ๊ฐ์ 'report' ์ํธ์ box 2์ ์
๋ ฅํ๋ค. 'input' ์ํธ์ d3 ์
์ ๊ฐ์ 'report' ์ํธ์ box 3์ ์
๋ ฅํ๋ค. 'report' ์ํธ์ box 3์์ **์ผ๋ก ๋๋ฌ์ธ์ธ ํ
์คํธ๋ฅผ ๋นจ๊ฐ์ ์ฒ๋ฆฌํ๋ค. 'report' ์ํธ๋ฅผ PDF ํ์ผ๋ก ์ธ์ํ๋ค. |
|
|
์ ์์
์ ๊ทธ๋ฆผ์ผ๋ก ๋ณด๋ฉด ๋ค์๊ณผ ๊ฐ์ต๋๋ค. |
|
|
์, ์ด๋ฒ์๋ ํจ์๋ฅผ ์ฌ์ฉํ์ง ์์ ์ฝ๋์ ์ฌ์ฉํ ์ฝ๋๋ฅผ ์ดํด๋ด
์๋ค. ์คํฌ๋กค ์๋ฐ ์ฃผ์ํ์ธ์!
ํจ์๋ฅผ ์ฌ์ฉํ์ง ์์ ์ฝ๋ |
|
|
Sub GenerateReports()
Dim wsInput As Worksheet Dim wsReport As Worksheet Dim rng As Range Dim cell As Range Dim pdfFilePath As String Dim box3 As Range Dim startRow As Long Dim endRow As Long
' ์ํธ ์ฐธ์กฐ Set wsInput = Worksheets("input") Set wsReport = Worksheets("report")
' ์์ ๋ฐ ์ข
๋ฃ ํ ์ค์ startRow = 2 endRow = 3
For i = startRow To endRow ' input ์ํธ์์ ๊ฐ ๋ณต์ฌ wsReport.Shapes("box 1").TextFrame.Characters.Text = wsInput.Cells(i, 2).Value ' B์ด wsReport.Shapes("box 2").TextFrame.Characters.Text = wsInput.Cells(i, 3).Value ' C์ด wsReport.Shapes("box 3").TextFrame.Characters.Text = wsInput.Cells(i, 4).Value ' D์ด
' box 3์์ **์ผ๋ก ๋๋ฌ์ธ์ธ ํ
์คํธ ๋นจ๊ฐ์ ์ฒ๋ฆฌ Set box3 = wsReport.Shapes("box 3").TextFrame.Characters With box3 Dim content As String content = .Text
Dim startPos As Long Dim endPos As Long
startPos = InStr(content, "**") If startPos > 0 Then endPos = InStr(startPos + 2, content, "**") If endPos > 0 Then ' ** ์ฌ์ด ํ
์คํธ ๋นจ๊ฐ์ ์ฒ๋ฆฌ With .Characters(startPos, endPos - startPos + 2).Font .Bold = True End With End If End If End With
' PDF ์ ์ฅ ๊ฒฝ๋ก ์ค์ pdfFilePath = ThisWorkbook.Path & "\\Report_" & i & ".pdf"
' report ์ํธ๋ฅผ PDF๋ก ์ธ์ wsReport.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfFilePath, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False Next i
MsgBox "๋ณด๊ณ ์๊ฐ ๋ชจ๋ ์์ฑ๋์์ต๋๋ค."
End Sub
|
|
|
ํจ์๋ฅผ ์ฌ์ฉํ ์ฝ๋ |
|
|
Sub GenerateReportsWithFunctions()
Dim wsInput As Worksheet Dim wsReport As Worksheet Dim pdfFilePath As String Dim startRow As Long Dim endRow As Long
' ์ํธ ์ฐธ์กฐ Set wsInput = Worksheets("input") Set wsReport = Worksheets("report")
' ์์ ๋ฐ ์ข
๋ฃ ํ ์ค์ startRow = 2 endRow = 3
For i = startRow To endRow ' 1. ๋ฐ์ดํฐ๋ฅผ ๋ณต์ฌ CopyInputToReport wsInput, wsReport, i
' 2. ๊ฐ์กฐ ํ
์คํธ ๋นจ๊ฐ์ ์ฒ๋ฆฌ BoldHighlightedText wsReport, "box 3"
' 3. PDF๋ก ์ ์ฅ pdfFilePath = GetPdfFilePath(ThisWorkbook.Path, i) SaveReportAsPdf wsReport, pdfFilePath Next i
MsgBox "๋ณด๊ณ ์๊ฐ ๋ชจ๋ ์์ฑ๋์์ต๋๋ค."
End Sub
|
|
|
์ด๋ ์ ๊ฐ์? ํจ์๋ฅผ ์ฌ์ฉํ ์ฝ๋๊ฐ ํจ์ฌ ์ง๊ด์ ์ด์ฃ ? ์ ๊ฐ ์๊ฐํ๋ ํจ์๊ฐ ๊ฐ์ง ํต์ฌ์ ์ธ ๊ธฐ๋ฅ์ ๋ค์ ๋ ๊ฐ์ง์
๋๋ค.
์ฒซ์งธ, ์ฌํ์ฉํ ์ ์์ต๋๋ค. ํจ์๋ฅผ ์ฌ์ฉํ ์ฝ๋๊ฐ ๋์ฑ ๊ฐ์ํ ์ด์ ๋ ์ค๋ณต๋๋ ์ฝ๋๋ฅผ ํจ์๋ก ๋ง๋ค์ด์ ์ฌํ์ฉํ๊ธฐ ๋๋ฌธ์
๋๋ค. ์ ์ฝ๋์ ์์
๋ด์ฉ์ ๋ค์ ๋ณด๋ฉด์ ์ค๋ณต๋๋ ๋ถ๋ถ์ ์ฐพ์๋ณด์ธ์. |
|
|
'input' ์ํธ์ b2 ์
์ ๊ฐ์ 'report' ์ํธ์ box 1์ ์
๋ ฅํ๋ค. 'input' ์ํธ์ c2 ์
์ ๊ฐ์ 'report' ์ํธ์ box 2์ ์
๋ ฅํ๋ค. 'input' ์ํธ์ d2 ์
์ ๊ฐ์ 'report' ์ํธ์ box 3์ ์
๋ ฅํ๋ค. 'report' ์ํธ์ box 3์์ **์ผ๋ก ๋๋ฌ์ธ์ธ ํ
์คํธ๋ฅผ ๋นจ๊ฐ์ ์ฒ๋ฆฌํ๋ค. 'report' ์ํธ์ box 4์์ **์ผ๋ก ๋๋ฌ์ธ์ธ ํ
์คํธ๋ฅผ ๋นจ๊ฐ์ ์ฒ๋ฆฌํ๋ค. 'report' ์ํธ๋ฅผ PDF ํ์ผ๋ก ์ธ์ํ๋ค.
'input' ์ํธ์ b3 ์
์ ๊ฐ์ 'report' ์ํธ์ box 1์ ์
๋ ฅํ๋ค. 'input' ์ํธ์ c3 ์
์ ๊ฐ์ 'report' ์ํธ์ box 2์ ์
๋ ฅํ๋ค. 'input' ์ํธ์ d3 ์
์ ๊ฐ์ 'report' ์ํธ์ box 3์ ์
๋ ฅํ๋ค. 'report' ์ํธ์ box 3์์ **์ผ๋ก ๋๋ฌ์ธ์ธ ํ
์คํธ๋ฅผ ๋นจ๊ฐ์ ์ฒ๋ฆฌํ๋ค. 'report' ์ํธ์ box 4์์ **์ผ๋ก ๋๋ฌ์ธ์ธ ํ
์คํธ๋ฅผ ๋นจ๊ฐ์ ์ฒ๋ฆฌํ๋ค. 'report' ์ํธ๋ฅผ PDF ํ์ผ๋ก ์ธ์ํ๋ค. |
|
|
์ค๋ณต๋๋ ์์
์ด ์ธ ๊ฐ์ง ๋ณด์
๋๋ค. ๊ทธ๋ฆฌ๊ณ ๊ทธ๊ฒ๋ค์ ํจ์๋ก ๋ง๋ ๊ฒ์ด์ฃ . ๊ฐ ํจ์๋ณ ๊ธฐ๋ฅ์ ๋ค์๊ณผ ๊ฐ์ต๋๋ค.
- CopyInputToReport โ 'input' ์ํธ์ ์
๊ฐ์ 'report' ์ํธ์ box๋ก ์ฎ๊ธฐ๊ธฐ
- BoldHighlightedText โ 'report' ์ํธ์ box ๊ฐ์์ **์ผ๋ก ๋๋ฌ ์ธ์ธ ํ
์คํธ๋ฅผ ๋นจ๊ฐ์ ์ฒ๋ฆฌํ๋ค.
- SaveReportAsPdf โ 'report' ์ํธ๋ฅผ PDF ํ์ผ๋ก ์ธ์ํ๋ค.
ํจ์์ ์ด๋ฆ๋ง ๋ด๋ ๋ฌด์จ ๊ธฐ๋ฅ์ ํ ์ง ๋๋์ด ์ค์์ฃ ? ๋ฌผ๋ก ๊ฐ ํจ์๋ง๋ค ์ฝ๋๋ฅผ ์์ฑํด ์ค์ผ ํฉ๋๋ค. ์๋ฅผ ๋ค๋ฉด BoldHighlightedText์ ์ฝ๋๋ ๋ค์๊ณผ ๊ฐ์ต๋๋ค. |
|
|
Set box3 = wsReport.Shapes("box 3").TextFrame.Characters
With box3
Dim content As String
content = .Text
Dim startPos As Long
Dim endPos As Long
startPos = InStr(content, "**")
If startPos > 0 Then
endPos = InStr(startPos + 2, content, "**")
If endPos > 0 Then
' ** ์ฌ์ด ํ
์คํธ ๋นจ๊ฐ์ ์ฒ๋ฆฌ
With .Characters(startPos, endPos - startPos + 2).Font
.Bold = True
End With
End If
End If
End With
|
|
|
์ด ๊ธด ์ฝ๋๋ฅผ ํจ์๋ฅผ ์ฌ์ฉํ๋ฉด ๋จ ํ ์ค๋ก ์ค์ผ ์ ์์ต๋๋ค. ๊ทธ๋ฆฌ๊ณ ํจ์์ ์
๋ ฅ๊ฐ์ธ '๋งค๊ฐ๋ณ์'๋ฅผ ๋ฐ๊พธ์ด๊ฐ๋ฉฐ ์ฌํ์ฉํ ์ ์์ง์.
๋์งธ, ์ฝ๊ณ ๊ณ ์น๊ธฐ ์ฝ์ต๋๋ค. ๋น๊ฐ๋ฐ์ ์ผ์๋ก ๊ฐ๋
์ฑ์ ์ค์ํ๋ค๊ณ ์๊ฐํฉ๋๋ค. ํจ์๋ฅผ ์ฌ์ฉํ์ง ์์ ์ฝ๋๋ ์ค์ด ๊ธธ์ด์ ์ฝ๊ธฐ ์ด๋ ค์ ์ฃ . ํจ์๋ฅผ ์ฌ์ฉํ์ฌ ๊ธฐ๋ฅ์ ์๊ฒ ์ชผ๊ฐ์ด ๋ณด๋ฉด ์ดํดํ๊ธฐ ์ฌ์์ง๋๋ค. ์ฝ๋๋ฅผ ์ง์ ์ฝ๊ณ ์ดํดํ์ง ์์๋ ๋ผ์. AI์๊ฒ ์ฃผ์์ผ๋ก ์ค๋ง๋ค ์ค๋ช
ํด ๋ฌ๋ผ๊ณ ํ๋ฉด ์ปดํจํฐ์ ์ธ์ด๋ฅผ ์ธ๊ฐ์ ์ธ์ด๋ก ์ดํด๋ณผ ์ ์์ต๋๋ค.
์์์ ๋ณธ BoldHighlightedText ํจ์์ AI๋ก ์ฃผ์์ ๋ฌ์๋ณด์์ต๋๋ค. |
|
|
' wsReport ์ํธ์์ "box 3"์ด๋ผ๋ ์ด๋ฆ์ ๊ฐ์ง ๋ํ(Shape)์ ํ
์คํธ ํ๋ ์์ ๊ฐ์ ธ์ box3 ๋ณ์์ ์ค์ Set box3 = wsReport.Shapes("box 3").TextFrame.Characters
' box3 ๊ฐ์ฒด์ ๋ํด ์์
์ํ With box3 ' ํ
์คํธ ๋ด์ฉ์ ์ ์ฅํ ๋ฌธ์์ด ๋ณ์ ์ ์ธ Dim content As String ' box3์ ํ์ฌ ํ
์คํธ๋ฅผ content์ ์ ์ฅ content = .Text
' "**" ๊ธฐํธ์ ์์๊ณผ ๋ ์์น๋ฅผ ์ ์ฅํ ๋ณ์ ์ ์ธ Dim startPos As Long Dim endPos As Long
' content์์ ์ฒ์ ๋ํ๋๋ "**" ์์น๋ฅผ ์ฐพ์ startPos = InStr(content, "**")
' ์์ ์์น๊ฐ 0๋ณด๋ค ํฌ๋ฉด(์ฆ, "**"๊ฐ ๋ฐ๊ฒฌ๋์์ผ๋ฉด) ๋ค์ ์์
์ํ If startPos > 0 Then ' ์์ ์์น ์ดํ์ ๋ํ๋๋ ๋ ๋ฒ์งธ "**" ์์น๋ฅผ ์ฐพ์ endPos = InStr(startPos + 2, content, "**")
' ๋ ๋ฒ์งธ "**"๊ฐ ๋ฐ๊ฒฌ๋์์ ๊ฒฝ์ฐ์๋ง ๊ธ์ ์์ ์ง์ If endPos > 0 Then ' "**" ์ฌ์ด์ ํ
์คํธ๋ฅผ ๊ตต๊ฒ ํ์ With .Characters(startPos, endPos - startPos + 2).Font .Bold = True ' ํด๋น ๊ตฌ๊ฐ์ ๊ธ์๋ฅผ ๊ตต๊ฒ ์ค์ End With End If End If End With
|
|
|
์ฝ๋ฉ ์ง์์ด ์ ํ ์๋ ๋ถ๋ค์๊ฒ๋ ์ฃผ์์ ๋ณด๊ณ ๋ ์ดํดํ๊ธฐ ์ด๋ ค์ฐ์ค ์ ์์ต๋๋ค. ํ์ง๋ง ํ๋ ๋ฌ ์ ๋๋ฅผ ๋ฐฐ์ฐ์๋ฉด ๋๋ต์ ์ธ ์ดํด๋ ๊ฐ๋ฅํด์ง๋๋ค. ์ ์ฝ๋๋ VBA์ด๊ณ , ์ ๋ ์ด ์ธ์ด์ ๋ฌธ๋ฒ์ ์ ํ ๋ชจ๋ฆ
๋๋ค. ํ์ง๋ง ์ฃผ์์ ๋ณด๊ณ '์ ์ด๋ฐ ์์ด๊ตฌ๋'ํ๊ณ ๋๋ต์ ์ผ๋ก ์ดํดํ ์ ์์ง์.
๊ทธ๋ฌ๋ฉด ์ฝ๋์์ ๋ฌธ์ ๊ฐ ์๊ฒผ์ ๋, ๋๋ ๊ธฐ๋ฅ์ ์์ ํ๊ณ ์ถ์ ๋ ์ด๋๋ฅผ ๊ณ ์ณ์ผ ํ ์ง ์ค์ค๋ก ์ฐพ์ ์ ์์ต๋๋ค. ๋ฌผ๋ก AI์๊ฒ ์ฝ๋๋ฅผ ์ ๋ถ ๋์ ธ์ฃผ๊ณ ๊ณ ์ณ๋ฌ๋ผ๊ณ ์ง์ํ ์ ์์ต๋๋ค. ํ์ง๋ง AI์๊ฒ ๊ธด ์ค์ ์ฝ๋๋ฅผ ๋ชฝ๋
๋์ ธ์ฃผ๊ณ ๊ณ ์ณ ๋ฌ๋ผ๊ณ ํ๋ ๊ฒ์ ์ ๋ชปํ๋ ๊ฒฝ์ฐ๊ฐ ๋ง์์ต๋๋ค. ๋ฐ๋ฉด ๊ธฐ๋ฅ๋ณ๋ก ์ชผ๊ฐ์ด ํจ์๋ฅผ ๋ง๋ค์ด์ ๊ณ ์ณ ๋ฌ๋ผ๊ณ ํ๋ฉด ํจ์ฌ ์ ๊ณ ์ณ์ฃผ์์ต๋๋ค.
๋ฐฑ๊ฐ์ด ๋ถ์ฌ์ผํ
็พ่์ด ๏ฅงๅฆไธ่ฆ์ด๋ฉฐ, ๋ฐฑ๋ฌธ์ด ๋ถ์ฌ์ผ๊ฒฌ์ด๋ฉฐ
็พ่ฆ์ด ไธๅฆไธๆ์ด๋ฉฐ, ๋ฐฑ๊ฒฌ์ด ๋ถ์ฌ์ผ๊ฐ์ด๋ฉฐ
็พๆ์ด ไธๅฅณไธ่ฆบ์ด๋ฉฐ, ๋ฐฑ๊ฐ์ด ๋ถ์ฌ์ผ๊ฐ์ด๋ฉฐ
็พ่ฆบ์ด ไธๅฆไธ่ก์ด๋ผ. ๋ฐฑ๊ฐ์ด ๋ถ์ฌ์ผํ์ด๋ผ
๋ฐฑ ๋ฒ ๋ฃ๋ ๊ฒ์ด ํ ๋ฒ ๋ณด๋ ๊ฒ๋ง ๋ชปํ๊ณ ,
๋ฐฑ ๋ฒ ๋ณด๋ ๊ฒ์ด ํ ๋ฒ ๋๋ผ๋ ๊ฒ๋ง ๋ชปํ๊ณ ,
๋ฐฑ ๋ฒ ๋๋ผ๋ ๊ฒ์ด ํ ๋ฒ ๊นจ๋ฌ์๋ง ๋ชปํ๊ณ ,
๋ฐฑ ๋ฒ ๊นจ๋ฌ์์ด ํ ๋ฒ ํํ๋ ๊ฒ๋ง ๋ชปํ๋ค.
โ ์ ์ฝ์ฉ์ ใ๋ชฉ๋ฏผ์ฌ์ใ ์ค์์-
์ถ์ฒ: ์๋นํ๋ง๋น
'๋ฐฑ๊ฐ์ด ๋ถ์ฌ์ผํ'์ด๋ ๋ง์ด ์๋ฏ์ด, ์ด ๊ธ๋ง์ผ๋ก๋ ๋ณด๊ณ ๋ฐ๋ผ ํ๊ธฐ ์ด๋ ค์ฐ์ค ๊ฑฐ๋ผ ์๊ฐํฉ๋๋ค. ์๋ํ๋ฉด ๋จ์ํ ๋ ์๊ฒ ์ชผ๊ฐ๋ ๊ฒ์ด ์๋๋ผ, ์ ์ฒด์ ์ธ ๊ตฌ์กฐ๋ฅผ ์๊ฐํ๋ฉฐ ์ ์ ํ ์์ค์ผ๋ก ์ชผ๊ฐ์ผ ํ๊ธฐ ๋๋ฌธ์
๋๋ค. ๋ํ ์ ๋ฌธ์ ์ธ ์ง์์ด ๋ถ์กฑํ ๋งํผ ์ํ์ฐฉ์ค๋ฅผ ์ฌ๋ฌ ๋ฒ ๊ฒช๊ฒ ๋ ๊ฒ์ด๊ธฐ ๋๋ฌธ์
๋๋ค.
๋ค์์ ๊ธฐํ๊ฐ ๋๋ค๋ฉด, ๋๋ฐฐ๋ฌํกํก์ ํตํด AI์ ํจ๊ป ์ฝ๋๋ฅผ ์์ฑํ๊ณ ํ๋ก๊ทธ๋จ์ ๋ง๋๋ ๊ณผ์ ์ ์์ฐํด ๋๋ฆฌ๊ฒ ์ต๋๋ค. ๋น๊ฐ๋ฐ์๋ถ๋ค๊ป์ AI๋ก ์ฝ๋๋ฅผ ์์ฑํ์ค ๋ ์ฐธ๊ณ ๋๊ธฐ๋ฅผ ๋ฐ๋๋๋ค.
๐ฆ ๋น์ ์ด ์ด๋ค ์ฌ๋์ด๋ ์ข์์. ์ง์คํ ๋ชจ์ต์ ๋ค๊ฐ์๋, ์ดํ๊ทน |
|
|
๐ฏ ์ฑ์ฅ์ ์ง์ฌ์ธ ์ฌ๋๋ค์ด ๋ชจ์ฌ ์ด์ ๋ณด๋ค ๋ ๋์ ์ค๋์ ๋ง๋๋ ๊ณณ
๋๋ฐฐ๋ฌ ์ปค๋ฎค๋ํฐ๋ ์ฑ์ฅ์ ์ง์ฌ์ธ ์ฌ๋๋ค์ด ๋ชจ์ฌ ํจ๊ป ํ๊ฑธ์์ฉ ๋์๊ฐ๋ ์์์ ์ ์ปค๋ฎค๋ํฐ์
๋๋ค. ์๊ธฐ๊ณ๋ฐ ์ ๋ณด ๊ณต์ , ๋
์๋ชจ์, ์ธ๋ฏธ๋ ๋ฑ์ด ํ๋ฐํ ์ด์๋๊ณ ์์ต๋๋ค. ํจ๊ป ์ฑ์ฅํ๊ณ ์ถ์ผ์๋ค๋ฉด ์ง๊ธ ๋ฐ๋ก ์ฐธ์ฌํ์ธ์! |
|
|
์ค๋์ ๋ด์ค๋ ํฐ ์ด๋ ์
จ๋์?
|
|
|
๋๋ฐฐ๋ฌ(The Better) | newsletter@thebetter.today
|
|
|
|
|