Question : Excel VBA : Comment courir dynamiquement a créé le code/corde

Hé experts,

I AM essayant d'exécuter une corde que j'ai dynamiquement créée.  J'établis ce code par une boucle, puis veux l'exécuter des afterwords.  Y a-t-il une fonction ou une manière que je peux faire ceci ?  Ou s'il n'y a pas, y a-t-il une manière alternative de résoudre mon problème ?  Voir le code pour ce que j'essaye à do.
class= > " clair " de
> de " codeSnippet " de class= de
class= " lineNumbers " de
class= de
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
16 :
17 :
18 :
19 :
>Function " de l'id= " codeSnippet790765 de
 TotalRows)
    SelectionString = SelectionString et "), TrailingMinusNumbers : =True »
    MsgBox (SelectionString)
    'Cette corde produit avec succès la fonction pour convertir le texte dans mon choix en colonnes.
    'Cependant, SelectionString est une corde évidemment, et ressemble à la fonction que j'ai besoin, mais j'ai besoin d'une manière de l'exécuter.
    'Ou j'ai besoin d'une manière différente de faire ceci. Le TotalRows change chaque fois, ainsi j'ai besoin d'une manière d'établir cette grande rangée de « FieldInfo » dynamiquement
    'NOTE : myArray est une rangée globale, ne s'inquiètent pas de ce qui est dans lui.
Fonction de fin
class= de

Réponse : Excel VBA : Comment courir dynamiquement a créé le code/corde


J'ai écrit le code suivant pour un autre problème, j'ai sorti la substance inutile, je crois que c'est une manière bien meilleure d'approcher ouvrir le cahier de travail dit, puis le fermer, puis en stoppant exceler

noter la fonction privée au fond, également ceci suppose que vous ajouterez une référence pour exceler dans le projet et pour utiliser également les importations 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 :
Obscurcir l'excelApp comme Excel.Application
        Obscurcir le WB comme Excel.Workbook
        Obscurcir le workbookName comme corde = « nom de cahier de travail d'essai »

        'ouvrir Excel à l'état réduit au minimum
        excelApp = nouveaux Excel.Application ()
        excelApp.Visible = CBool (Microsoft.Office.Core.MsoTriState.msoTrue)
        excelApp.WindowState = Excel.XlWindowState.xlMinimized

        'cahier de travail ouvert
        WB = excelApp.Workbooks.Open (workbookName, Microsoft.Office.Core.MsoTriState.msoFalse, _
                                     Microsoft.Office.Core.MsoTriState.msoFalse, _
                                     Microsoft.Office.Core.MsoTriState.msoTrue)
	
	WB.close
	excelApp.quit

        le 'besoin de libérer ces objets ou eux de COM peut demeurer ouvert dans les services courants
        ReleaseObject (excelApp)
        ReleaseObject (WB)
        ReleaseObject (WS)
        ReleaseObject (cible)

        excelApp = rien
        WB = rien
        Le WS = rien
        cible = rien
        'Effacement targetArray

        'courir le collecteur d'ordures
        GC.Collect ()

    ReleaseObject secondaire privé (ByVal o comme objet)
        Essai
            System.Runtime.InteropServices.Marshal.ReleaseComObject (o)
        Crochet ex comme exception
        Enfin
            o = rien
        Essai de fin

    Sous-marin d'extrémité
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
  •  Winzip 12 issues de secours du travail ?
  •  
    programming4us programming4us