Discussion :

[cha_choux]

Tu aurais intérêt à désactiver le calcul automatique en début de fonction puis à le remettre en fin de fonction. Idem pour le rafraichissement d'écran. Ca fait gagner beaucoup de temps à la macro.

J'ai testé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Application.ScreenUpdating = False
 
 Application.ScreenUpdating = True

4 secondes de gagnées, merci !
Je vais l'ajouter à chaque manipulation d'Excel de cette grosse MAJ quotidienne.

Pour :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Application.Calculation = xlCalculationManual
Application.Calculation = xlCalculationAutomatic

Celui-ci ne me fait pas gagner de temps, ce qui me semble logique puisque l'Excel est uniquement le résultat d'un export d'un logiciel.

Je prend en tout cas bien note de ces éléments super utiles

[Pierre Fauconnier]

Si c'est un extract d'un logiciel, je suppose qu'il est constant (au moins dans la forme et la structure).

Je réalise souvent des automatisations de nettoyage d'extract SAP et en général, c'est assez simple à nettoyer, et surtout, constant d'une fois à l'autre (pour une même demande SAP, bien entendu).

En créant des petites fonctions, tu simplifies ta maintenance en cas de modifs dans la forme de l'extract

[cha_choux]

Dans le cas où une condition doit être remplie, tu peux la placer dans la formule que tu crées dans range("d1:d100000").formula.
Le plus simple pour moi étant de la créer dans Excel, puis de la regarder en VBA pour voir comment la construire/adapter.

Pense toujours Excel avant de penser VBA (et logique "programmeur"). Dans des traitements de ce genre, tu gagneras du temps à utiliser la puissance d'Excel dans des formules que d'utiliser du code itératif en VBA

Range("A1").Formula = ...
Encore quelque chose que je découvre grâce à vous (j'ai effectivement vu que dysorthographie l'avait utilisé)
Je vais regarder comment ca fonctionne et l'adapter pour essayer de faire la concaténation (les collègues n'auront peut être même pas le temps d'imaginer se lever pour un café!)

J'utilise effectivement pas mal l'enregistreur de macro, mais il est vrai que pour des lignes de code sur de la récurrence c'est plus compliqué

[cha_choux]

Si c'est un extract d'un logiciel, je suppose qu'il est constant (au moins dans la forme et la structure).

Je réalise souvent des automatisations de nettoyage d'extract SAP et en général, c'est assez simple à nettoyer, et surtout, constant d'une fois à l'autre (pour une même demande SAP, bien entendu).

En créant des petites fonctions, tu simplifies ta maintenance en cas de modifs dans la forme de l'extract

J'essaye , c'est pour cela également que je blinde le code de commentaire.

Je regarderais à l'occasion pour passer par le nom des colonnes que je conserve, plutôt que de compter combien de colonnes je dois supprimer, j'aurais moins de chance d'avoir un bug s'ils décident de modifier la requête d'extraction

Mais pour l'instant place au formula !

[Pierre Fauconnier]

Crée une formule dans une cellule Excel, par exemple en A1 (avec une fonction, voire plusieurs, c'est mieux) puis, dans la fenêtre d'exécution VBA (CTRL+G si pas affichée), tu saisis ? range("a1").Formula puis ENTER pour valider.

Tu verras la formule en anglais. Ca te permet de voir comment Formula fonctionne.

Il en existe plusieurs, mais perso, je n'aime pas les .FormulaLocal ou .FormulaR1C1Local, je préfère la formulation anglaise, plus "passe-partout".

Ca te permet, comme je l'ai montré dans mon exemple sur la concaténation, de placer une cellule sur toute une colonne d'un seul coup, sans boucles.

Ca permet des trucs très intéressant.

Autre chose du même tonneau, la fonction VBA EVALUATE qui permet d'évaluer la chaine qu'on lui passe (une formule en anglais) et d'en restituer le résultat.

[cha_choux]

Je ne connaissait pas (pour ne pas changer cet après midi ) CTRL+G, je n'utilise que ALT+F11 pour lancer Microsoft Visual Basic

Donc si je comprends bien les étapes :
je met dans C1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=D1+E1

je fait un CTRL+G sur C1
je tape dans référence :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

? range("a1").Formula

je fais entrer

Et il me dit que la référence n'est pas valide.
Je vais regarder sur Google : l'idée de voir la formule en anglais me séduis pas mal

[Pierre Fauconnier]

CTRL+G, c'est dans le VBE qu'il faut le faire pour voir la fenêtre d'exécution (GO en anglais, d'où le raccourci) puis saisir les lignes données dans cette fenêtre. Tu peux aussi l'afficher via le menu Affichage du VBE.

[cha_choux]

Merci beaucoup, j'ai compris comment faire.

Pour la concaténation de plusieurs lignes de colonne B ayant le même élément en colonne A + suppression des lignes qui ont servi a la concaténation je verrais quand j'aurais plus en main cette nouvelle façon de procéder car pour l'instant c'est trop nouveau