엑셀 데이터를 입력하고 버튼을 눌렀을 때
📨 슬랙이나
📲 카카오톡으로
자동으로 메시지가 발송된다면, 업무 속도가 엄청나게 올라가겠죠?
오늘은 VBA를 이용해서
✅ 특정 셀의 내용 또는 보고 내용을
✅ 슬랙이나 카카오톡에 자동 전송하는 방법을
각 서비스별로 정리해서 알려드릴게요.
⸻
✅ 1. 슬랙(Slack)에 메시지 보내기 – Webhook 사용
슬랙은 Incoming Webhook이라는 아주 간단한 API를 제공합니다.
⸻
✅ 1단계: Webhook 설정
1. https://api.slack.com/apps 접속
2. 새 앱 생성 → “Incoming Webhooks” 기능 활성화
3. Webhook URL 생성 (예: https://hooks.slack.com/services/XXXXX/YYYY/ZZZZZ)
4. 채널 선택 후 저장 → Webhook URL 복사
⸻
✅ 2단계: VBA 코드 – 버튼 클릭 시 슬랙으로 전송
Sub SendToSlack()
Dim http As Object
Dim message As String
Dim json As String
Dim webhookURL As String
' 슬랙 Webhook URL
webhookURL = "https://hooks.slack.com/services/여기에_본인_URL"
' 전송할 메시지: 예를 들어 A1 셀 값
message = Sheets("보고서").Range("A1").Value
' JSON 형식 메시지 구성
json = "{""text"":""" & message & """}"
' HTTP 요청
Set http = CreateObject("MSXML2.XMLHTTP")
http.Open "POST", webhookURL, False
http.setRequestHeader "Content-Type", "application/json"
http.Send json
MsgBox "슬랙 전송 완료!", vbInformation
End Sub
⸻
✅ 2. 카카오톡으로 메시지 보내기 – 카카오 i 오픈빌더 또는 알림톡 API
일반 사용자가 VBA로 바로 카카오톡 메시지를 보내는 건 제한이 많지만, 다음 두 가지 방식으로 가능합니다.
⸻
✅ 방법 1: 카카오 i 오픈빌더 + 챗봇 + Webhook 연동
• 카카오 i 오픈빌더에서 Webhook 이벤트 챗봇 만들기
• 사용자가 챗봇에게 말을 걸면, Webhook 서버(VBA 또는 중계 서버)에서 응답
• 고급 개발이 필요하며, 단순 자동 알림에는 적합하지 않음
⸻
✅ 방법 2: 알림톡(비즈메시지) API 사용 (사업자 전용)
• 카카오 비즈 계정 + 알림톡 API 신청 (NHN, 다날, 메시지플러스 등)
• API 키와 템플릿 승인 후 HTTP 요청으로 메시지 전송 가능
• 사업자 인증 필수, 개인은 이용 불가
⸻
✅ 대안: 슬랙 대신 카카오워크 연동 (웹훅 지원)
• 카카오워크는 슬랙처럼 Webhook 지원 → 슬랙 방식과 유사하게 VBA로 전송 가능
⸻
🔁 일반 사용자를 위한 우회 대안
• 슬랙 또는 디스코드 사용 (Webhook 가능)
• 또는 메일 자동 발송 + 스마트폰 앱 알림 연동 방식 사용
⸻
요약 정리
채널 전송 방식 접근성
슬랙 Webhook + VBA 매우 쉬움 ✅
카카오워크 Webhook + VBA 쉬움 ✅
카카오톡 오픈빌더/알림톡 API 복잡 ❗ (사업자 전용)
디스코드 Webhook + VBA 쉬움 ✅
문자(SMS) 외부 문자 API 연동 유료 ⚠
⸻
다음 작업: 버튼 연결
1. [개발 도구] → [삽입] → 양식 버튼 생성
2. SendToSlack 매크로 연결
3. 버튼 텍스트: “슬랙 알림 보내기”
⸻
이 기능은
📢 보고서 자동 알림,
✅ 업무 확인 요청,
📎 실시간 상태 공유 등에 매우 유용합니다.
⸻
카테고리 없음
엑셀에서 버튼 클릭 시 특정 셀 내용을 슬랙(Slack) 또는 카카오톡으로 자동 전송하는 방법 (VBA + API 연동)
반응형
반응형