Dator
 |  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Hur till Öppen XLS-filer på ett formulär i VBA

    Microsoft Office Excel är ett kalkylprogram som vanligen används för att analysera stora mängder data . Microsoft Visual Basic for Applications ( VBA ) är en dator programmeringsspråk som används för att automatisera rutinuppgifter i Microsoft Office-program . Du kan skapa grafiska gränssnitt ( GUI ) i Excel för att ge större flexibilitet för användaren . I några få steg , kan du skriva VBA-kod för att öppna en befintlig Excel-arbetsbok och visa dess innehåll genom en listruta kontroll . Instruktioner
    1

    Starta Microsoft Office Excel och skriver följande om " Blad1 . "

    Type " Field1 " i " A1 " , " Fält2 " i " B1 " och " Field3 " i " C1 "

    Type " 1 " i " A2 " , " 2,1 " i " B2 " , och " 3,5 " i " C2 "

    Spara arbetsboken till " C : \\ " som " myExcelData.xls . "
    2

    Starta Microsoft Office Excel , välj " Utvecklare " fliken och klicka sedan på " Visual Basic . " Välj " Infoga " -menyn och klicka på " UserForm . "

    Klicka " ListBox " kontroll i " verktygslådan " Fönster och vänster - klicka var som helst på " UserForm1 " för att skapa en listruta . Klicka " CommandButton " och vänster - klicka var som helst på " UserForm1 " för att skapa en ny knapp .
    3

    Högerklicka på " ListBox1 " i formuläret och välj " Egenskaper".

    typ 3 bredvid " columnCount . "
    4

    Dubbelklicka på " CommandButton1 " för att öppna Microsoft Visual Basic .

    Kopiera och klistra in koden nedan i din nya modulen .
    5

    Private Sub CommandButton1_Click ( ) katalog

    Dim xlApp Som Excel.Application

    Dim XLWbook Som arbetsbok

    Set xlApp = Ny Excel.Application

    Set XLWbook = 0 ) = 1 ) = 2 ) = 0 ) = 1 ) = 2 ) = XLWbook.Sheets ( " Blad1 " ) . Range ( " C2 " ) . Value

    XLWbook.Close

    End Sub
    6

    Tryck " F5 " och klicka på " CommandButton1 " för att öppna din" myExcelData.xls " och visa dess innehåll i listrutan .

    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur man använder Visual Basic för att avgöra skillna…
    ·Lägga till eBay Web Services i VB.NET
    ·Hur man kompilerar en VB.Net Ansökan
    ·Hur man kan utveckla Widgets i Visual Basic
    ·Hur höja en händelse i Visual Basic
    ·Hur visar jag en blankett i en Vb.NET Console Applicati…
    ·Hur man gör en Auto -genererande Antal i VB6
    ·Hur man använder WMP kontroll på Vb.Net
    ·Hur man bygger ett projekt i VB.NET 2005
    ·Färger i en VBA Begränsning
    Utvalda artiklarna
    ·Hur man tömmer en array PHP
    ·Hur att skapa program för Windows Mobile Net
    ·Hur Hämta en Array i MySQL
    ·PHP Parse Alternativ
    ·Hur man installerar en Sun Java ActiveX Control
    ·Hur man hittar en triangel i en triangel med Java -kod
    ·Listor I Python
    ·Hur man skapar en fil med PHP
    ·HTML rullgardinsmenyn Tutorial
    ·Merge Sort i Java-kod
    Copyright © Dator Kunskap http://www.dator.xyz