Je regarde le code vba excel de quelqu'un d'autre. ils font ReDim Preserve dataMasortingx(7, i) dans les deux loops. Qu'est-ce que cela fait? En outre, il semble que la deuxième boucle suffit d'écraser datatables dans la première boucle, n'est-ce pas? Dim dataMasortingx() As Ssortingng Worksheets.Item("ETS").Select Do While Trim(Cells(r, 1)) <> "" Debug.Print "The line: ", […]
Je sais que VBA dans Excel n'est pas le plus rapide – mais j'ai besoin de la manière la plus efficace (c'est-à-dire la plus rapide) de passer à travers un grand échantillon de lignes. Actuellement, j'ai: For Each c In Range("$A$2:$A$" & Cells(Rows.count, "A").End(xlUp).row ' do stuff Next c Le «faire des choses» comprend insert […]
Afin d'optimiser mon code, j'éteins plusieurs propriétés d' object Application Object ; un en particulier étant la propriété .CutCopyMode . Sub MyProcedure() With Application .ScreenUpdating = False .EnableEvents = False .CutCopyMode = False End With ' lots of code here Devrais-je remettre BackCopyMode (par ex. True) avec les autres avant que mon sous termine? ' […]
J'ai écrit une macro comme add = in . Et je dois get le path de la feuille de travail actuelle sur laquelle il est exécuté. Comment puis-je faire cela? Comment puis-je get le path du file (juste le directory)?
J'essaie de comparer deux files Excel et de stocker ce qu'il y a dans le nouveau file dans une seule feuille et de stocker ce qui est là-bas dans l'ancien dans une autre feuille. (Fondamentalement new – old = sheet1 et old – new = sheet2 .) Une réponse SO suggère de boucler toutes les […]
J'ai un file csv de 1,2 million d'loggings de text. Les champs alphanumériques sont emballés entre guillemets, les champs date / heure ou numériques ne sont pas. Par exemple "Fred", "Smith", 01/07 / 1967,2, "7, The High Street", "Anytown", "Anycounty", "LS1 7AA" Ce que je veux faire, c'est écrire un VBA dans Excel (plus ou […]
J'ai le code suivant et j'aimerais qu'il soit exécuté dans 25 autres feuilles du classur et au lieu de répéter le code 25 fois, pour chaque feuille, il y a-t-il un moyen de faire la boucle? Quelqu'un peut-il aider? Sub DeleteEmptyRows() Dim ws As Worksheet Dim strSearch As Ssortingng Dim lRow As Long strSearch = […]
J'utilise Excel pour get des valeurs à partir d'une page Web. Entre autres éléments, le HTML contient le tableau suivant: <div id="myDiv"> <table class="myTable"> <tbody> <tr> <td>Text1:</td> <td class="data"><strong>0.51</strong></td> </tr> <tr> <td>Text2:</td> <td class="data"><strong>2199</strong></td> </tr> </tbody> </table> </div> La page est stockée dans la variable oHtml. Il fonctionne bien pour prendre d'autres éléments en dehors […]
J'ai une table à deux dimensions avec des pays et des années dans Excel. par exemple. 1961 1962 1963 1964 USA axgy France ueha Germany oxnp Je voudrais "l'aplatir", de sorte que j'ai le Pays dans le premier col, Année dans le deuxième col, puis la valeur dans le troisième col. par exemple. Country Year […]
Le problème que j'avais est assez simple à décrire. Il a été foré dans ma tête (grâce à beaucoup de lecture sur SO et d'autres forums / ressources Excel VBA) qu'en général, afin d'éviter les bogues et de fournir une bonne expérience user, il est préférable d'éviter d'utiliser .Activate , ActiveSheet , ActiveCell , etc., […]