Excel VBA 스크립트 보조 편집

2193 단어
오늘 자신을 크게 때렸다는 것을 인정하지 않을 수 없다.Visual Basic(VB), 이 언어는 줄곧 대수롭지 않은 언어입니다.전에는 게임 보조만 썼어요.고상한 자리에 오르기 어렵다고 여겨지는 이 언어는 오늘 나에게 수업을 잘 해 주었다.일의 장면: 요 며칠 동안 줄곧 수요 문서를 정리하고 있다.각종 Word, 각종 Excel.물론 프로그래머는 문서를 볼 줄 모른다.한 무리의 프로그램원들이 문서를 둘러싸고 프로그램을 짜고 있다.각종 복사 붙여넣기, 각종 검색 교체는 모두 프로그램이 실현하기를 바란다.나는 Excel 부분을 책임지고 jxl을 사용한다.jar는 각종 논리를 처리합니다.결과는 온갖 닭이 날고 개가 뛴다.각종 격식이 일치하지 않고, 각종 이상, 각종 누락.한 번씩 맞고 돌아오다.마지막 손 정리.재미있는 일이 생겼다.Excel의 각종 공식은 프로그램의 인터페이스보다 현저히 좋다.통계 방면이 순조롭게 완성되다.남은 각종 조작, 염색, 삭제, 분할, 합병...나는 굉장한 생각을 하기 시작했다.사실은 VBA야.한 단락을 녹음하고, 한 단락을 고치고, 문서를 조사하다.관건적인 절차가 매우 빨리 실현되었다.다시 세분화하여 포장하다.스크립트가 완성되었습니다.다른 언어보다 훨씬 간단명료하다.개발 환경도 절약하고VB와 오피스가 함께 모여야 최상의 실력을 발휘할 수 있다.언어가 쓸모없는 것이 아니라 우리가 사용할 수 없는 것이다.나는 앞으로 문서를 처리하는 것이 재미있는 일이 될 것이라고 생각한다.
간단한 염색 스크립트:
Sub  ()
'
'  1  
'

'
    Dim arr1
    arr1 = Array("438", "563", "564", "751", "752", "753", "754", "824", "825", "826", "827", "828", "829", "830", "831", "832", "833", "834", "835", "836", "837", "838", "839", "840", "841", "842", "843", "844", "845", "846", "847", "848", "849", "850", "851", "852", "853", "854", "855", "856", "857", "858", "859", "860", "861", "862", "863", "864", "865", "866", "867", "868", "869", "870", "871")
      (arr1)
End Sub

Sub  (n)
    For a = 3 To 2200
            Range("A" + CStr(a)).Select
            If ActiveCell.FormulaR1C1 = n Then
                With Selection.Interior
                    .Pattern = xlSolid
                    .PatternColorIndex = xlAutomatic
                    .Color = 255
                    .TintAndShade = 0
                    .PatternTintAndShade = 0
                End With
            End If
       Next a
End Sub

Sub  (arr)
    For Each n In arr
         (n)
    Next
End Sub
Excel 문서가 편집되지 않도록 하는 방법
Raspberry Pi3에서 7형 HDMI 모니터(정전기 콘덴서 터치, USB 연결) 사용

좋은 웹페이지 즐겨찾기

개발자 우수 사이트 수집

개발자가 알아야 할 필수 사이트 100선 추천 우리는 당신을 위해 100개의 자주 사용하는 개발자 학습 사이트를 정리했습니다
best100-homepage