Inserimento Riga nella Posizione 1

martedì 16 ottobre 2012 - 12.42

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

Elenco Tags VB.NET

giucorn Profilo | Junior Member

83 messaggi | Data Invio: mar 16 ott 2012 - 12:42

Ciao a tutti, avrei la necessita di inserire nella prima riga una nuava di etichette.

Effettuo il seguente codice:
Dim path As String = Excel ' Path dove si trova il tuo file

Dim xlApp As Excel.Application ' Riferimento all'applicazione Excel
Dim xlBook As Excel.Workbook ' Riferimento al Workbook
Dim xlSheet As Excel.Worksheet ' Riferimento al Worksheet

Try

' Crei un'oggetto Applicazione Excel, assegnandola alla variabile che la identifica:
xlApp = CreateObject("Excel.Application")

' Ai riferimenti del workbook il il File Excel che vuoi aprire
xlBook = xlApp.Workbooks.Open(path)

xlBook = xlApp.Workbooks.Open(path) ' Apro il file

' Definisci il foglio di lavoro
xlSheet = xlBook.Worksheets(1)

xlSheet.Activate() ' Attiva il foglio di lavoro

' Completo il foglio excel

xlSheet.Cells(1, 1).Value = "A"
xlSheet.Cells(1, 2).Value = "B"
xlSheet.Cells(1, 3).Value = "C"

' ... ....

Catch ex As Exception
MessageBox.Show(ex.Message)

Finally
' Poi al momento di chiudere:
xlBook.Close(True) ' Chiudi il foglio di lavoro salvando (true) o non salvando (False)
xlApp.Quit() ' Chiudi l'applicazione excel

' Annienta le variabili utilizzate.
xlSheet = Nothing
xlBook = Nothing
xlApp = Nothing
End Try

Va tutto bene, l'unica cosa che non so fare ed inserire una riga nuova, infatti in questo caso sovrascrivo la riga1 esistente.

Grazie in anticipo per l'aiuto

Ciao

DomA Profilo | Expert

537 messaggi | Data Invio: mar 16 ott 2012 - 18:03

Guarda qui trovi il codice in vb.net, C# e JAVA

http://www.devdirect.com/all/asposecellsfornet_SOLN_00010031.aspx

-----------------------------------------------------------------------------------------------------
Ricorda che, accettare la risposta è un modo di ringraziare chi ci ha aiutato ed evidenziare che il problema è stato risolto.

http://www.infomidia.it

Domenico

giucorn Profilo | Junior Member

83 messaggi | Data Invio: mer 17 ott 2012 - 09:00

Ho inserito il seguente codice:

xlSheet.Cells.Insertrows(2, 10)

Dovrebbe far inserire la alla posizione 2 10 righe, ma mi da come errore
"Impossibile trovare il membro pubblico Insertrows nel tipo Range

Non sono un esperto del forum non sapevo come fare, adesso l'ho capito, in ritardo ma l'ho capito :-)

DomA Profilo | Expert

537 messaggi | Data Invio: mer 17 ott 2012 - 11:06

qundi hai risolto?

-----------------------------------------------------------------

Ricorda che, accettare la risposta è un modo di ringraziare chi ci ha aiutato ed evidenziare che il problema è stato risolto.

http://www.infomidia.it

Domenico

giucorn Profilo | Junior Member

83 messaggi | Data Invio: mer 17 ott 2012 - 16:15

No non ho risolto, mi da come errore:
"Impossibile trovare il membro pubblico Insertrows nel tipo Range

Aiuto................

DomA Profilo | Expert

537 messaggi | Data Invio: mer 17 ott 2012 - 19:27

Scusami solo adesso ho notato che quello richiede una libreria a pagamento.

Con una ricerca ho trovato questo codice (da testare):

per prima cosa importa il namespace

Imports Excel.xlDirection

Dim xlWorkSheet As Excel.Worksheet
xlWorkSheet .Rows("5").select()
xlWorkSheet .Range("5:5").Rows.Insert(xlDown)

-------------------------------------------------------------------------------------------------

Ricorda che, accettare la risposta è un modo di ringraziare chi ci ha aiutato ed evidenziare che il problema è stato risolto.

http://www.infomidia.it

Domenico

giucorn Profilo | Junior Member

83 messaggi | Data Invio: gio 18 ott 2012 - 08:31

Ho inserito il codice come mi hai detto però alla riga:

xlWorkSheet.Range("5:5").Rows.Insert(xldown)

mi da errore nome "xldown non dichiarato, come lo devo dichiarare?

giucorn Profilo | Junior Member

83 messaggi | Data Invio: gio 18 ott 2012 - 09:09

inserendo la funzione

xlWorkSheet .Range("5:5").Rows.Insert()

Funziona lo stesso.

Grazie tante...

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 !