Ciao a tutti,
sto facendo un programma in VB.Net che consente all'utente di selezionare 2 file Excel diversi per copiarne i moduli e i form dal primo al secondo.
Inizialmente pensavo fosse una cosa semplice ma alla fine mi sono ricreduto...
Non riesco a visualizzare la lista dei moduli e dei form del primo file per poterli poi copiare nel secondo.
Avevo in mente una funzione che mi salvasse in un array i nomi dei moduli allo stesso modo di come faccio per gli Sheet tipo questa:
Il problema che ho trovato è che, apparentemente, non esiste nessun oggetto di tipo "Modulo" o "Form" tipocodice:Public Function DammiListaSheet(ByVal xlsBook As Excel.Workbook) As String() Dim Sheets As Excel.Worksheet Dim lista(MAX_SHEET) As String Dim i As Integer For i = 0 To MAX_SHEET lista(i) = "-1" Next i i = 0 For Each Sheets In xlsBook.Worksheets lista(i) = Sheets.Name i = i + 1 Next Sheets DammiListaSheet = lista End Function
Qualcuno sa darmi una mano?codice:Dim MioModulo As Excel.Modules Dim MioForm As Excel.Forms
Grazie in anticipo
Andrea

Rispondi quotando