| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
software  
  • Adobe Illustrator
  • animation Software
  • Antivirus Software
  • Audio Software
  • Sikkerhedskopiere data
  • brænde cd'er
  • brænde dvd'er
  • Datakomprimeringssystem
  • database Software
  • Desktop Publishing
  • Desktop Video
  • Digital Video Software
  • Drupal
  • Educational Software
  • Engineering Software
  • Fil Forlængelse Types
  • finansiel Software
  • Freeware, Shareware & Abandonware
  • GIMP
  • grafik Software
  • Home Recording Software
  • Microsoft Access
  • Microsoft Excel
  • Microsoft Publisher
  • Microsoft Word
  • Open Source Code
  • Anden Computer Software
  • PC spil
  • Photoshop
  • Portable Document Format
  • PowerPoint
  • præsentation Software
  • produktivitet Software
  • Quicktime
  • Remote Desktop Management
  • SQL Server
  • Skype
  • Software betaversioner
  • Software Consultants
  • Software Development Companies
  • software Licensing
  • regneark
  • Skat forberedelse software
  • Utility Software
  • Web Clip Art
  • Windows Media Player
  • Tekstbehandling Software
  •  
    Computer Viden >> software >> Microsoft Access >> Content
    Sådan bruges ER.TOM i Excel VBA
    Det er vigtigt at huske på, at ikke alle funktioner i et Excel-regneark kan bruges i Visual Basic for Applications . Dog kan " ER.TOM "-funktionen bruges både som en formel i et regneark, og i VBA til at tjene samme formål - som er at kontrollere, om en celle er tom. Denne funktion er almindeligt anvendt i en løkke til at gå gennem en kolonne eller række af celler , indtil du kommer til en tom celle. Instruktioner
    1

    Klik på " Udvikler " fanen og klik på " Visual Basic " for at åbne VB editor vinduet. Klik på " Indsæt" menuen og klikke på " Modul " for at indsætte et nyt modul
    2

    Opret en sub procedure ved at tilføje følgende kode : .

    Private Sub checkForBlankCell () < br >
    3

    Opret en heltalsvariabel og give det en værdi på 1:

    Dim X As Integer

    X = 1
    4 < p > Tilføj data til de første ti rækker af A1: .

    Range (" A1" ) Vælg

    ActiveCell.FormulaR1C1 = "1 "

    Range (" A2 " . ) Vælg

    ActiveCell.FormulaR1C1 = "2 "

    Range (" A1: A2 " ). Vælg

    Selection.AutoFill Destination: = Range (" A1: A10 " ) , Type: = xlFillDefault

    Range (" A1: " ). Vælg

    Range (" . A10 A1 " ) Vælg
    5

    Opret en løkke og kontrollere, om cellen er tom ved at bruge " IsEmpty " celle funktion og vise hver celle værdi gennem den Immediate -vinduet : Hej

    Gør Indtil IsEmpty ( ActiveCell.Value )

    Range (" A" & X) . Vælg

    Debug.Print ( ActiveCell.Value )

    X = X ​​+ 1

    Loop
    6

    End proceduren ved at skrive " End Sub " og tryk på " Ctrl" og "G " for at vise Immediate -vinduet. Klik på " F5 " for at køre proceduren.

    Forrige :

    næste :
      Relaterede artikler
    ·Sådan Set en reference til Microsoft 12,0 Object Libra…
    ·Dele af Microsoft Excel 
    ·Hvordan kan jeg kontrollere, hvis en fil eksisterer i E…
    ·Sådan Spring Udskrivning Rækker , der har en celle væ…
    ·Sådan Forbered en hovedbog i et Microsoft Excel ark 
    ·Sådan oprettes brugerdefinerede værktøjslinjer i Exc…
    ·Sådan fjernes en kopieret Tick Box Fra Excel 
    ·Sådan fjernes nuller i Excel 
    ·Sådan ændres Skriftfarve i Excel 
    ·Hvordan til at tælle antallet af unikke værdier på e…
      Anbefalede Artikler
    ·Sepia Beregninger for Photoshop 
    ·Sådan Fix Color på StarCraft : Brood War 
    ·Stadier af DBMS 
    ·Sådan slå lyden til i OpenOffice Impress 
    ·Sådan bruges Power2Go 
    ·Sådan Konverter Open Office dokumenter online 
    ·Hvordan til forslaget Med Illustrator 
    ·Hvorfor får vi en Script Error Message From QuickBooks…
    ·Sådan Edit MP3 Data 
    ·Hvordan laver noget mere Black Brug Photoshop 
    Copyright © Computer Viden http://www.computerdk.com