Pergunta : Excel VBA: Como funcionar dinâmicamente criou o código/corda

Hey peritos,

I am que tenta executar uma corda que eu criasse dinâmicamente.  Eu construo este código através de um laço, a seguir quero-o executá-lo afterwords.  Há uma função ou uma maneira que eu posso fazer este?  Ou se não há, há uma maneira alternativa de resolver minha edição?  Ver o código para o que eu estou tentando a do. class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
>Function notpretty RunCode " do class= " do id= " codeSnippet790765 do 
 TotalRows)
    SelectionString = SelectionString & "), TrailingMinusNumbers: =True”
    MsgBox (SelectionString)
    'Esta corda produz com sucesso a função para converter o texto em minha seleção às colunas.
    'Entretanto, SelectionString é uma corda obviamente, e olha como a função que eu preciso, mas eu preciso uma maneira de executá-la.
    'Ou eu preciso uma maneira diferente de fazer isto. O TotalRows muda cada vez, assim que eu preciso uma maneira de construir dinâmicamente esta grande disposição de “FieldInfo”
    'NOTA: myArray é uma disposição global, não se preocupa sobre o que está nele.
Função do fim
class= do

Resposta : Excel VBA: Como funcionar dinâmicamente criou o código/corda


Eu escrevi o seguinte código para um outro problema, mim removi o material desnecessário, mim acredito que esta é uma maneira muito melhor de aproximar a abertura do manual de instruções dito, a seguir o fechamento dele, a seguir parando primar

observar a função confidencial na parte inferior, igualmente esta supor que você adicionará uma referência para primar no projeto e para usar igualmente as importações 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:

Escurecer o excelApp como Excel.Application
        Escurecer a WB como Excel.Workbook
        Escurecer o workbookName como a corda = do “nome do manual de instruções teste”

        'Excel aberto ao estado minimizado
        excelApp = Excel.Application novos ()
        excelApp.Visible = CBool (Microsoft.Office.Core.MsoTriState.msoTrue)
        excelApp.WindowState = Excel.XlWindowState.xlMinimized

        'manual de instruções aberto
        WB = excelApp.Workbooks.Open (workbookName, Microsoft.Office.Core.MsoTriState.msoFalse, _
                                     Microsoft.Office.Core.MsoTriState.msoFalse, _
                                     Microsoft.Office.Core.MsoTriState.msoTrue)
	
	WB.close
	excelApp.quit

        'a necessidade de liberá-los estes objetos ou de COM pode permanecer aberta nos serviços running
        ReleaseObject (excelApp)
        ReleaseObject (WB)
        ReleaseObject (WS)
        ReleaseObject (alvo)

        excelApp = nada
        WB = nada
        WS = nada
        alvo = nada
        'Erase targetArray

        'funcionar o coletor de lixo
        GC.Collect ()

    ReleaseObject secundário confidencial (ByVal o como o objeto)
        Tentativa
            System.Runtime.InteropServices.Marshal.ReleaseComObject (o)
        Prendedor ex como a exceção
        Finalmente
            o = nada
        Tentativa do fim

    Submarino da extremidade
Outras soluções  
 
programming4us programming4us