Questione : Excel VBA: Come funzionare dinamicamente ha generato il codice/stringa

Hey esperti,

I che prova ad eseguire una stringa che ho generato dinamicamente.  Sviluppo questo codice attraverso un ciclo, quindi voglio eseguirlo afterwords.  È ci una funzione o un senso che posso fare questo?  O se ci non è, è ci un senso alternativo risolvere la mia edizione?  Vedere il codice per che cosa sto provando a do. class= > " libero " del
> " del codeSnippet " del class= del
class= " lineNumbers " del
class= del 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
>Function notpretty RunCode (TotalRows) " del class= " del id= " codeSnippet790765 del 
 TotalRows)
    SelectionString = SelectionString & "), TrailingMinusNumbers: =True„
    MsgBox (SelectionString)
    'Questa stringa produce con successo la funzione per convertire il testo nella mia selezione in colonne.
    'Tuttavia, SelectionString è ovviamente una stringa ed assomiglia alla funzione che ho bisogno di, ma ho bisogno di un senso eseguirlo.
    'O ho bisogno di un modo diverso di fare questo. Il TotalRows cambia ogni volta, in modo da ho bisogno di un senso sviluppare dinamicamente questo grande allineamento “di FieldInfo„
    'NOTA: myArray è un allineamento globale, non si preoccupa per che cosa è in esso.
Funzione di conclusione
class= del

Risposta : Excel VBA: Come funzionare dinamicamente ha generato il codice/stringa


Ho scritto il seguente codice per un altro problema, io ho eliminato il roba inutile, io credo che questo fosse un senso molto migliore avvicinarsi all'apertura del libro di esercizi detto, quindi a chiuderlo, quindi rinunciando eccellere

notare la funzione riservata alla parte inferiore, inoltre questa presuppone che aggiungerete un riferimento per eccellere nel progetto ed anche per utilizzare le importazioni Excel = microsoft.blah.blah.blha

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:

Oscurare il excelApp come Excel.Application
        Oscurare il WB come Excel.Workbook
        Oscurare il workbookName come stringa = “nome del libro di esercizi della prova„

        'Excel aperto alla condizione minimizzata
        excelApp = nuovi Excel.Application ()
        excelApp.Visible = CBool (Microsoft.Office.Core.MsoTriState.msoTrue)
        excelApp.WindowState = Excel.XlWindowState.xlMinimized

        'libro di esercizi aperto
        WB = excelApp.Workbooks.Open (workbookName, Microsoft.Office.Core.MsoTriState.msoFalse, _
                                     Microsoft.Office.Core.MsoTriState.msoFalse, _
                                     Microsoft.Office.Core.MsoTriState.msoTrue)
	
	WB.close
	excelApp.quit

        'la necessità di liberarli questi oggetti o di COM può rimanere aperta nei servizi correnti
        ReleaseObject (excelApp)
        ReleaseObject (WB)
        ReleaseObject (WS)
        ReleaseObject (obiettivo)

        excelApp = niente
        WB = niente
        La WS = niente
        obiettivo = niente
        'Erase targetArray

        'fare funzionare il collettore di immondizia
        GC.Collect ()

    ReleaseObject secondario riservato (ByVal o come oggetto)
        Prova
            System.Runtime.InteropServices.Marshal.ReleaseComObject (o)
        Fermo ex come eccezione
        Infine
            o = niente
        Prova di conclusione

    Sommergibile dell'estremità
Altre soluzioni  
 
programming4us programming4us