[Vb.net] Cella Excel --> Label

giovedì 21 febbraio 2008 - 08.49

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

gdlcore Profilo | Junior Member

141 messaggi | Data Invio: gio 21 feb 2008 - 08:49

Ciao a tutti, ho VS2005, ho questo problema.
Io vorrei estrarre il testo da una cella (fissa) che è in un foglio excel e visualizzare quel testo in una label .

Come faccio? Aiutatemi..grazie a tutti!

Ferux Profilo | Newbie

44 messaggi | Data Invio: gio 21 feb 2008 - 11:01

Ciao,
fai così usa gli Interop:
(Add References dal progetto Microsoft Office 11.0 Object Library)

Imports Excel = Microsoft.Office.Interop.Excel

Dim ExcelObj As Excel.Application = Nothing

ExcelObj = New Excel.Application

Dim theWorkbook As Excel.Workbook = ExcelObj.Workbooks.Open("percorso file", 0, True, 5, "", "", True, Excel.XlPlatform.xlWindows, "\t", False, False, 0, True, True, False)

Dim sheets As Excel.Sheets = theWorkbook.Worksheets
Dim worksheet As Excel.Worksheet = Nothing

'Selezione foglio di lavoro
worksheet = CType(Me.ExcelObj.Sheets.Item(1), Excel.Worksheet)

'Recupero valore dalla cella
dim label as string = worksheet.Cells(i, y).Value.ToString()

Spero di esserti stato di aiuto
Saluti

Ing Ferux
[MCP MCAD]

gdlcore Profilo | Junior Member

141 messaggi | Data Invio: ven 22 feb 2008 - 07:47

Ciao, grazie per l'aiuto, ho inserito il codice che mi hai scritto tu ma mi da tanti errori.
Uno ad esempio riferito a Imports Excel = Microsoft.Office.Interop.Excel: mi dice che in imports c'è errore di sintassi. Un altro esempio che in Excel.application mi dice che non è definito e cosi via per gli altri Excel.xxxxx.
Mi potresti aiutare?Uso VS2005, cosa ho sbagliato?

Ferux Profilo | Newbie

44 messaggi | Data Invio: ven 22 feb 2008 - 08:01

Ciao,
ti tranquillizzo dicentodi che il codice funziona. Probabilmente ho omesso qualche istruzione.
Comunque ora procediamo per gradi:

1 - Devi fare il riferimento alla libreria "Microsoft Excel 11.0 Object Library". Da "Add References" selezioni il tab "COM"

2 - Ora dovrebbe funzionare

Scusami nella fretta di rispondere ti ho dato la references errata. Fammi sapere

Saluti
Ing Ferux
[MCP MCAD]

gdlcore Profilo | Junior Member

141 messaggi | Data Invio: ven 22 feb 2008 - 08:11

Ok grazie in qualche modo sono riuscito,ora mi è rimasto un errore..
Excel.XlPlatform.xlWindows

Per questa sintassi mi dice che Excel non è dichiarato..devo cambiare qualcosa?

gdlcore Profilo | Junior Member

141 messaggi | Data Invio: ven 22 feb 2008 - 09:53

Ok non ti preoccupare, ho risolto..grazie mille!

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !