Résultats de la recherche

Je joins un fichier excel (modifié, raccourci), qui est à la base une base de donnée pro et dont l’extension n’est pas un .xslm mais un .hdb et qui peut s’ouvrir avec bloc note. Ce fichier de base est constitué d’une première partie qui se termine au mot clef « [STRUCTURES_NUMBER] ». En...

Bonjour, je suis amené a tracer des graphiques importants en terme de données nécessaires. Les graphes tracés ne sont pas "satisfaisants" dans la mesure ou l’échelle n'est pas adaptée : je peux avoir un max a y = 3 et le graphe qui va jusque y = 10E9. Je sais que je peux parcourir mes...

Bonjour, voici un bout de code qui bug sur une ligne particulière et cela me laisse perplexe car cela semble être la syntaxe normale. Dim xHDB(10000) As Variant (essayer avec ou sans) 'declaration de variable Dim x_repdeb_HDB(20, 2) 'declaration de variable Open link For...

Bonjour, j'ai un tableau qui ressemble a cela : edit xx xx xx vide xx xx xx xx xx xx vide xx (<- numéro de la ligne recherchée) et je veux connaître la dernière ligne ou il y a une information, ou la première vide. Je me suis inspiré d'un précédant code que j'avais fait...

Bonjour, je viens de créer une macro qui fonctionne a un détail prés... Je viens tout d'abord récupérer un nombre A dans une feuille sheet. Pour le cas qui me pose problème, admettons A > 10. Je fais une boucle ensuite, pour i = 1 a A. Dans cette boucle je crée une nouvelle sheet que je...

Bonjour, ce bout de code ne veut pas compiler, et je ne vois pas de raison a cela... Sub HdbCutter() Dim xHDB(10000) Dim x_repdeb_HDB(20, 2) Open "older\file.hdb" For Input As 1 Nbline = 0 NSTR = 0 r = 1 Do While Not EOF(1) Line Input #1, xHDB(r) If InStr(xHDB(r)...

Hello, je veux imposer la valeur maximale sur l'axe vertical d'un graphique. Je ne parviens pas a trouver la commande exacte qui semble être a base de xlValue et de MaximumScale. Je ne suis pas contre un peu d'aide :p

Bonjour, je souhaite compter le nombre de Worksheet d'un Woorbook qui peut également contenir des Charts : je veux que seule les Worksheet soit comptabilisé. Pour cela j’écris : onglet = ActiveWorkbook.Sheets.Count mais je me rends compte qu'il ne fait pas de distinction entre...

Bonjour, je veux supprimer des "onglets-graphes". J'ai ecrit ce code mais cela ne marche pas et je ne comprends pas... Sub delete_graph() Dim graph As Chart, wbk As Workbook Set wbk = ThisWorkbook For Each graph In wbk.Charts graph.delete Next graph End Sub Qu'est ce...

Bonjour, je voudrais créer une boite de dialogue avec 3 boutons "all" "manual" et "cancel", et lorsqu'on clique sur l'un d'eux, ils vont chercher des infos différentes (efface les données de la colonne et arrêt de la macro pour cancel). Voici mon code : If MsgBox("Chose a type"...

Bonjour, j'essaye de surperposer sur 1 seul graphe plusieurs courbes issues chacune d'une sheet différente. J'ai voulu procéder de la manière suivante: créer un graphique sur une sheet en particulier, parcourir l'ensemble des sheet contenant les données et créer les courbes a insérer dans...

Bonjour, je voulais savoir s'il était possible de déterminer le format des cellules excel avec du VBA. En gros, je recopie des données sur un fichier tiers et je veux arrondir a l’unité prêt la valeur dans la feuille nouvellement créée. Je sais qu'il y a une icône qui permet de faire cela...

Bonjour, je débute en VBA et je séché sur ce code> Je vais essayer de le commenter afin de vous faire voir ce que je veux faire et le problème auquel je suis confronte. Le voici : Sub resultats() 'Creation d'une nouvelle sheet nommée resultats Dim shtoto As Worksheet Set shtoto =...