잡 동 사 니 블 로 그

셀 탭 복사하면 위와 같은 메세지를 보신적이 있을 겁니다. 다들 하염없이 Y를 누르셨을텐데 이제부터 그러지 마시고 방법을 해결해 주세요 1. 도구모음->수식->이름관리자에 들어가서 모두 선택 후 삭제 그래도 나올 경우 숨은 이름정의가 있는 것이기에 2. 해당시트 우클릭->코드보기->코드입력->실행(화살표 모양 아이콘)->나가기 (복사해서 붙여 넣을 코드표) Sub show_Names() Dim n As Name For Each n In ThisWorkbook.Names n.Visible = True Next n End Sub 2-1. 1. 도구모음->수식->이름관리자에 들어가서 모두 선택 후 삭제 모든 문제가 해결됩니다.

엑셀에서 alt+f11을 눌러서 창을 띄워 준다. ​ 삽입 - 모듈 ​ Sub Pic() Dim myPic As Variant myPic = Application.GetOpenFilename _ (filefilter:="Picture Files,*.jpg;*.bmp;*.tif;*.gif") If myPic = False Then Exit Sub End If With ActiveSheet.Pictures.Insert(myPic).ShapeRange .LockAspectRatio = msoFalse .Height = Selection.Height - 4 .Width = Selection.Width - 4 .Left = Selection.Left + 2 .Top = Selection.Top + 2 End Wi..

본적으로 외워야 할 단축키 ctrl + a : 전체 선택 ctrl + c : 복사 ctrl + v : 붙여넣기 ctrl + z : 이전 명령 취소(반복시 과거 실행 했던 내용이 계속 취소됨), ※조심히 사용해야할 명령, 실수로 많이 취소했을 경우 좌측 상단 오른쪽 화살표로 복원 ctrl + s : 저장 ctrl + n : 새 문서 만들기 shift + 방향키 : 셀 확장 ​ 알면 편한 단축키 shift + space : 가로 전체 선택(열) ctrl + space : 세로 선체 선택(행) f4 : 이전 명령 반복 실행 alt + 1 : 셀 서식 ctrl + ; : 오늘 날짜 입력 ctrl + home : 첫셀 이동 ctrl + end : 마지막셀 이동(데이타가 있으면 데이타의 끝으로 이동) ctrl + ..

엑셀 이름충돌 1분 해결방법お쪼꼼^쓰^ 2016.11.21 13:16 엑셀 시트 추가할때 이름충돌? 해결해보자 엑셀은 제가 가장 자주 사용하는 프로그램이자 가장 편리하다고 생각하는 프로그램입니다. 많은 기능은 쓰지 않기 때문에 수식이 아니면 오류날 일도 적은 프로그램 중 하나인데요. 그래도 생..

엑셀로 예산서를 작성할때 산출내역을 적지요? 예를들어, 1,500원*5명*2학기 라구요. 이걸 B3셀에 입력했다고 치고 C3셀에 이 결과를 계산기를 두드려서 15,000 이라고 입력을 하겠지요. 그렇다면 이렇게 입력한 산출내역을 엑셀에서 자동으로 계산되게끔 할 수는 없을까요? 할 수 있습니다. ..

Alt + F11 > 삽입 > 모듈 붙여넣기 Sub ins_Pic() Dim myPic As Variant myPic = Application.GetOpenFilename _ (filefilter:="Picture Files,*.jpg;*.bmp;*.tif;*.gif") If myPic = False Then Exit Sub End If With ActiveSheet.Pictures.Insert(myPic).ShapeRange .LockAspectRatio = msoFalse .Height = Selection.Height .Width = Selection.Width .Left = Selection.Left .Top = Select..

Excel 파일이 매크로 바이러스에 감염되어 아래와 같은 증상으로 고생하시는 분들을 위해 공개합니다. -- 아 래 -- 1. 이름정의 및 style이 과다 등록되어 파일이 비정상적으로 커지고 2. 셀 및 시트의 복사 및 이동시 이름 충돌 3. 파일 종료시 매크로 실행 4. 잦은 프로그램 다운 및 파일 깨짐 &..

1.당초내역 2.변경내역(행삽입) 3.주의사항 4.UserForm Source : UserForm3 ※추가기능설치 : http://blog.daum.net/termious/3 Private Sub UserForm_Initialize() With Me .Caption = "행삽입 및 삭제" .RefEdit1 = Selection.Address .Height = 95 .ToggleButton1.BackColor = &HC0E0FF End With End Sub Sub CommandButton1_Click() 'Dim cmdbtn1 As Boolean 'Dim cmdbtn2 A..

면적자동산출프로그램.xls 분전반.xls 칸나누기.xla

적산 할때 유용하죠! alt+ f11 하신후에 모듈추가하여 카피해서 붙여넣으시면 됩니다. Function textsum(strChr As String) As Double Dim i As Integer Dim j As Integer Dim ii As Integer Dim newStr As String Dim strTemp As String i = Len(strChr) ii = 0 If i = 0 Then Exit Function For j = 1 To i strTemp = Mid(strChr, j, 1) '[]안에 들어가는 글자나 ..