Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> .

Come ottenere un valore da un foglio di lavoro utilizzando VB

Come ottenere un valore da un foglio di lavoro Excel con Visual Basic può rendere l'applicazione più flessibile leggendo il foglio di lavoro dinamico invece di avere all'utente di inserire manualmente i valori . Questo compito può essere facilmente realizzata utilizzando la libreria di oggetti di Microsoft Excel. I programmatori spesso incontrano difficoltà a leggere i fogli di lavoro , perché si dimentica di definire la cella del foglio di lavoro come un tipo di dati " Excel.Range " . Una volta fatto questo si può facilmente leggere i dati di cella utilizzando la proprietà "Value" . Istruzioni
1

lancio di Microsoft Visual Studio , fare clic su " Nuovo Progetto" dal riquadro sinistro dello schermo del computer , e di espandere " Visual Basic " sotto " modelli installati . " Fare clic su "Windows" e fare doppio clic su " Applicazione console " dal centro della finestra di dialogo per creare un nuovo progetto console .

2 Fare clic sul menu "Progetto " e selezionare " Proprietà " . Fare clic su "Riferimenti " quindi selezionare "Aggiungi " . Selezionare " COM " e clicca su " Libreria oggetti di Microsoft Excel " . Fare clic su "OK".
3

Digitare il seguente codice nella prima riga del modulo per dichiarare all'Ufficio namespace Microsoft :

Importazioni Microsoft.Office.Interop

4

digitare quanto segue per creare le variabili oggetto e definire il percorso e il foglio di lavoro che si vuole utilizzare :

Dim valueRead As String Dim

xlsxApp Come Excel . Application = Nuovi Excel.Application

xlsxApp.DisplayAlerts = False

xlsxApp.Workbooks.Open ( "C : \\ ExcelWorksheet.xlsx " )
5

Edit il percorso e il nome del foglio di lavoro nel passaggio precedente e digitare il percorso e il nome del foglio di lavoro . Aggiungere il seguente codice per utilizzare " Foglio1 ", come il foglio da leggere :

Dim xlsxSht Come Excel.Worksheet = xlsxApp.Sheets ( 1 ) economici 6

Definire la cella che si desidera leggere e leggere il valore :

Dim xlsxRange Come Excel.Range xlsxSht.Cells = ( 1 , 1 ) per

valueRead = xlsxRange.Value

xlsxApp = Nothing
Pagina 7

Visualizza il valore letto attraverso la finestra della console :

Console.WriteLine ( valueRead ) per

Console.ReadLine ( ) economici 8

Press "F5" per eseguire il programma .

 

Programmazione © www.354353.com