본문 바로가기
반응형

전체 글25

개인정보처리방침 개인정보 처리방침 [박재현](이하 '회사')은(는) 이용자의 개인정보를 보호하고 이와 관련한 고충을 신속하고 원활하게 처리할 수 있도록 다음과 같은 개인정보 처리방침을 수립·공개합니다. 1. 개인정보의 처리 목적 '회사'는 다음의 목적을 위하여 개인정보를 처리합니다. 처리하고 있는 개인정보는 다음의 목적 이외의 용도로는 이용되지 않으며, 이용 목적이 변경되는 경우에는 별도의 동의를 받는 등 필요한 조치를 이행할 예정입니다. 앱 서비스 제공 및 서비스 이용에 따른 본인 식별·인증 고객 문의 처리 및 고충 해결 2. 처리하는 개인정보의 항목 '회사'는 서비스 제공을 위해 필요한 최소한의 개인정보만을 수집합니다. 필수 수집 .. 2026. 6. 24.
매크로에서 실행파일에 메시지 보내기 (32, 64bit 공용) Option Explicit Public Type COPYDATASTRUCT dwData As LongPtr cbData As Long lpData As LongPtr End Type #If VBA7 Then ' https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-findwindowaPrivate Declare PtrSafe Function FindWindow Lib "user32.dll" Alias "FindWindowA" _ (ByVal lpClassName As String, _ .. 2026. 2. 9.
폴더안에 있는 워드 일괄 출력하는 매크로 Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal Milliseconds As LongPtr) Sub BatchPrintWordDocuments() Dim objWordApplication As New Word.Application Dim strFile As String Dim strFolder As String strFolder = InputBox("폴더 주소 입력", "폴더 주소", "D:\temp\") 'strFolder = "D:\temp\" strFile = Dir(strFolder & "*.docx", vbNormal) While strFile "" With objWordApplication .Documents.Open (strFolde.. 2025. 10. 29.
KeyDown시 Key값 KeyDown시 key값 ($ )------------------------ VK_A 41 A key VK_B 42 B key VK_C 43 C key VK_D 44 D key VK_E 45 E key VK_F 46 F key VK_G 47 G key VK_H 48 H key VK_I 49 I key VK_J 4A J key VK_K 4B K key VK_L 4C L key VK_M 4D M key VK_N 4E N key VK_O 4F O key VK_P 50 P key VK_Q 51 Q key VK_R 52 R key VK_S 53 S key VK_T 54 T key VK_U 55 U key VK_V 56 V key VK_W 57 W key VK_X 58 X key VK_Y 59 Y key VK_Z .. 2023. 11. 16.
소계, 합계 (ROLLUP 함수) SELECT DECODE(GROUPING(AA),1,'총')||NVL(A.WKYY,'계') WKYY, SUM(BASICAMT) BASICAMT, EVALTOTAL, CASE WHEN A.GUBUN='2' THEN 'AAA' WHEN A.GUBUN='3' THEN 'BBB' ELSE LTIPER END LTIPER, SUM(GLTIAMT) GLTIAMT, DIVISION, A.GUBUN, PAYYY1, NLTIAMT1, PAYYY2, NLTIAMT2, PAYYY3, NLTIAMT3, PAYYY4, NLTIAMT4, PAYYY5, NLTIAMT5, SUM("2019.01"), SUM("2020.01"), SUM("2021.01"), SUM("2022.01"), SUM("2023.01") ,AA ,CASE W.. 2023. 4. 19.
pivot, unpivot 여러개 처리 * PIVOT SELECT * FROM ( SELECT 1 KEY1 , 1 SEQ, '1' COL1 , '1000' COL2, '1000' COL3 FROM DUAL UNION ALL SELECT 1 KEY1 , 2 SEQ, '2' COL1 , '2000' COL2, '5000' COL3 FROM DUAL ) PIVOT (MAX(COL1) AS COL1, MAX(COL2) AS COL2, MAX(COL3) AS COL3 FOR SEQ IN (1 AS R1, 2 AS R2)) * UNPIVOT SELECT * FROM ( SELECT '282' COL1, '1' COL2 , '홍길동1' R1_L_02, '12345' R1_L_02_1, '20200101' R1_L_03, 'Y' R1_L_04 , '홍길동2.. 2023. 4. 19.
pivot, unpivot 여러개 처리 * PIVOT SELECT * FROM ( SELECT 1 KEY1 , 1 SEQ, '1' COL1 , '1000' COL2, '1000' COL3 FROM DUAL UNION ALL SELECT 1 KEY1 , 2 SEQ, '2' COL1 , '2000' COL2, '5000' COL3 FROM DUAL ) PIVOT (MAX(COL1) AS COL1, MAX(COL2) AS COL2, MAX(COL3) AS COL3 FOR SEQ IN (1 AS R1, 2 AS R2)) * UNPIVOT SELECT * FROM ( SELECT '282' COL1, '1' COL2 , '홍길동1' R1_L_02, '12345' R1_L_02_1, '20200101' R1_L_03, 'Y' R1_L_04 , '홍길동2.. 2023. 4. 5.
TreeView를 그려주고 FullExpand 한 다음 제일 위쪽으로 옮길때 PictureTreeView.TopItem := PictureTreeView.Items.GetFirstNode; 2023. 3. 17.
Key값 관련 블록선택 : Shift + Alt + 화살표 블록선택된것 해제 : ctrl + O 다음 K KeyDown시 key값 ($ )------------------------ VK_A 41 A key VK_B 42 B key VK_C 43 C key VK_D 44 D key VK_E 45 E key VK_F 46 F key VK_G 47 G key VK_H 48 H key VK_I 49 I key VK_J 4A J key VK_K 4B K key VK_L 4C L key VK_M 4D M key VK_N 4E N key VK_O 4F O key VK_P 50 P key VK_Q 51 Q key VK_R 52 R key VK_S 53 S key VK_T 54 T key VK_U 55 U key VK_V 56 V .. 2023. 3. 17.
FUNCTION 예제 CREATE OR REPLACE FUNCTION SECVIP.SF_WORKID(P_YYYY IN VARCHAR2, P_JUCHA in varchar2) RETURN VARCHAR2 IS P_RESULT VARCHAR2(10); BEGIN SELECT P_YYYY||P_JUCHA||LPAD(TO_CHAR(NVL(MAX(SUBSTR(WORKID,7,4))+1,1)),4,'0') INTO P_RESULT FROM SEV_WORK WHERE WORKID LIKE P_YYYY||P_JUCHA||'%'; RETURN P_RESULT; END; 2023. 1. 27.
반응형

티스토리툴바