Skip Navigation Links.
Expand VBAVBA
엑셀프로그래밍이 필요한 이유
Expand ExcelExcel
Expand External LibraryExternal Library
Expand SolutionSolution
Expand EssayEssay

CommandBar|Err|Err.Number|CommandBars.Add|Array|
|FaceID|CopyFace|Controls.Add|Parameter|OnAction|
|Visible|Shapes|AddShape|Enabled|ActionControl|

명령줄의 콘트롤을 위한 아이콘그림이 도대체 몇개나 들어 있는가?

몇개나 들어 있는지 알수가 없다
이것이 몇개 들어 있다고 설명된곳도 없고 이것을 알아내는 속성도 없다
엑셀만을 위한것이 아니고 워드,억세스,파워포인트등 오피스그룹의
모든 프로그램에 공통으로 제공되는 오브젝트에 속해있는것이니
수 도 없이 많다
한번 알아보고 싶지 않은가?
몇개 인지 알수 없는 갯수를 순환하려고 할때
어떻게 모든 갯수가 끝날때 순환을 정지할수 있을까??
이문제는 초보님들에게 아주 좋은 연습도구이다
점심먹으러 가기전에 돌려 놓고 와서 보니..
그림과 같이 10033개에서 끝났다
화일사이즈는 2.6메가정도가 되었다

  • 행방향으로 10개씩 한후 다음 행으로 넘어 가려면..
  • 몇개인지 모르는 갯수를 순환하려면..
  • CommandBar를 순환하면서 각각의 Control의 FaceId를 찾아서 하나??
  • 그렇다면 갯수가 10033개가 안되는데??
  • 명령줄과 콘트롤을 임시로 만들어 사용한다는것이 무엇인가?
  • 행X열을 왔다갔다 전달할때 Cells속성이 좋을까..Range속성이 좋을까??
  • 위와 같은 의문을 갖고 생각 좀 하신후 화일을 보시기 바란다
  • 배가 지독하게 곺아야 밥맛도 좋고 영양가가 높아지듯이..
  • 문제의식이 강해야 해법이 소화가 잘된다!!


Full Copy FaceID To Sheet



콘트롤의 아이콘을 찾아서 어디다 써먹나??(사용자정의 명령줄 만들어보기)

아이콘이 만여개가 넘게 있다는것을 알았다(중간,중간 빈 그림도 있지만)
이것도 역시 엑셀이 제공하는 자원이다
자원을 잘 활용하고 응용하는자!! 현대의 승리자다!!
아래의 그림과 같이 화살표세트가 아이콘으로 잘 만들어져 있다



워크시트를 약 10장을 삽입하고

그냥 가기는 심심하니까..각시트에 도형을 하나씩 다른게 그려 넣고
위의 아이콘을 이용하여 명령줄을 만들어 각각의 콘트롤을 크릭하면
시트간을 앞으로 뒤로..맨앞으로..맨뒤로 이동되도록 해본다
여러 시트가 있을때 시트간을 이동하는
Navigation Bar의 한가지 방법이 될것이고 결과는 아래의 그림과 같다

  • 명령줄의 위치는 다양하게 설정할수 있고
  • Temporary매개변수를 True로 해주면 쓸데없는 명령줄이 만들어지지 않는다
  • 아하..콘트롤의 Parameter속성이 이럴때 편리 하군
  • Array함수가 안쓰이는 곳이 없다!!
  • Enabled속성을 활용하여 현재 상황을 분석하여 콘트롤을 죽이고 살린다
    유용한 코드한줄 더 추가하면 역시 쎄련된 모양이 되는군!!
  • 소루션을 만들때 FaceID리스트를 만들어 보는 코드를 갖고 있으면 이래서 좋군
  • ActionControl속성은 현재 크릭된 콘트롤을 얻어 낸다


Make Simple Navigation Bar With FaceID