Datamaskin
  | Hjem | Hardware | Nettverk | Programmering | Software | Feilsøking | Systems | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringsspråk
  • Delphi Programming
  • Java Programming
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl Programming
  • Python Programming
  • Ruby Programming
  • Visual Basics Programming
  •  
    Datamaskin >> Programmering >> Visual Basics Programming >> Content
    Hvordan avgjøre om et regneark eksisterer Bruke Excel.Application
    VBA er en automatisering og makro programmeringsspråk utviklet av Microsoft som er inkludert og brukt i noen av Microsofts viktigste produkter, inkludert , Microsoft Office. VBA samsvarer med Microsoft COM ( Component Object Model ), hvor det ser og bryter programmer som excel til objekter for programmerere å samhandle og manipulere programmet. Application objektet regnes som den høyeste objektet i Microsoft Excel-objekt -modellen . Det representerer Excel programmet selv . Alle andre objekter, for eksempel : arbeidsbok , regneark og celler er under den. Opprette et program for å teste om en viss regneark finnes i arbeidsboken er enkelt når du starter en samtale til Excel Application objektet . Instruksjoner
    en

    Åpne Microsoft Excel.
    2

    Klikk på " Verktøy ", " Makro " og deretter " Visual Basic. " Dette vil åpne VBA programmering miljø .
    3

    Klikk "Sett inn ", " Module ". Du er nå i en programmeringskode modul

    skriv eller kopier og lim inn følgende kode : .

    Funksjon WorksheetExists ( _

    FullPathToWorkbook As String , _
    < p > WorksheetName As String _

    ) Som Boolean

    Dim objExcel som objekt

    Dim objWorksheet som objekt

    Sett objExcel = CreateObject ( " Excel.Application " )

    objExcel.Workbooks.Open " c: \\ Book1.xls "

    Hver objWorksheet I objExcel.ActiveWorkbook.Worksheets
    p Hvis objWorksheet.Name = " Sheet3 " Da

    WorksheetExists = sant

    MsgBox ( " regneark eksisterer ")

    Exit For

    End If

    Neste objWorksheet
    < p> objExcel.ActiveWorkbook.Close SaveChanges : = False

    Set objExcel = Ingenting

    End Function

    früher :

     Weiter:
      Relatert Artike
    ·Hvordan Lukk arbeidsbøker i VBA 
    ·Hvordan kjøre en URL Fra kode med VB.NET 
    ·Hvordan lage et tegneprogram 
    ·Slik kjører VB6 kode 
    ·Hvordan lage en etikett Visning Verdi av rullefeltet i …
    ·Hvordan lage en meldingsboks i Visual Basic 
    ·Hvordan legge til ODBC til VB.Net Express 
    ·Hvordan bygge en datamaskin Tabell 
    ·Hvordan få tilgang til en Lag tabell-spørring Autonum…
    ·Hvordan Roter et InlineShape i VB6 
      Anbefalte artikler
    ·Hvordan lage en vektor av strykere i C + + 
    ·Hvordan Destroy Word-dokumenter 
    ·Hvordan å kapitalisere en String i Perl 
    ·Redefinere metoder i C + + 
    ·Hvordan lage en digital klokke i Java 
    ·Hvordan Tegn en fem poeng stjerne bruker Python Språk 
    ·Sette inn tekstbokser Med VBA -kode i Excel 
    ·Slik konverterer datoer i VBA 
    ·Slik bruker regulære uttrykk til Block Spam 
    ·Hva er de Logiske data Entity Concepts 
    Copyright ©  Datamaskin  http://www.datamaskin.biz/