Résultats de la recherche

Bonjour, je cherche à rendre mon code VBA pour supprimer des colonnes plus rapide J'ai trouvé cette macro de Job, qui fonctionne si je fais feuille par feuille Sub SupprimeColonnes() Dim v, c As Range, sup As Range v = "x" For Each c In ActiveSheet.UsedRange.Rows(2).Cells If c = v Then Set...

Bonjour a Tous Connaissez vous la formulation en vba pour cette commande: je souhaite controler si la série est en erreur, si oui la supprimer, si non, passer à la suivante. Ce que j'ai mis en exemple plante

Bonsoir Je cherche à faire une boucle sur des "pictures" nommées et leurs créer un lien hypertexte sur le même nom de ma base. Sub CreeliensImageVersBase() A = 2 ' ligne 2 For i = 1 To Sheets("Plan").Pictures.Count ' je compte mes images Set S = Sheets("plan").Shapes(i) 'je prend le...

CB60 a mis en ligne un nouveau programme : Graphique escalier - Different G escalier Lire la suite...

CB60 a mis en ligne un nouveau programme : Graphique Histo, avec une coupe - Pas à Pas graphique Lire la suite...

CB60 a mis en ligne un nouveau programme : 2 couleurs entre courbes - Pas à pas Lire la suite...

CB60 a mis en ligne un nouveau programme : Graph Anneaux, genre compteur - Compteur Lire la suite...

CB60 a mis en ligne un nouveau programme : Graph histo double empilé - G histo double empilé Lire la suite...

Bonjour Je cherche à faire une macro pour colorier entre deux caractères, mais je ne trouve pas la syntaxe. Sub couleur() mot = "^« *" mot1 = "* »$" mot2 = mot & mot1 For Each c In Range("A2:A" & [A65000].End(xlUp).Row) p = InStr(UCase(c), UCase(mot2)) If p > 0 Then...

Bonsoir J'ai réalisé cette macro Elle fonctionne en mode pas à pas ( F8), mais lorsque je la lance via un bouton elle plante sur la ligne Pouvez vous m'indiquer pourquoi! PS: J'ai trouvé, pour mon test j'avais mis dans certaine cellule un alea entre borne, en pas à pas cela ne posé pas de...

Bonjour Comment modifier cette ligne de code: pour pouvoir mettre des images en début des nœuds. normalement object.Add(relative, relationship, key, text, image, selectedimage) merci

Bonsoir Je recherche une police de caractère des bâtons (des I) de différente hauteur et de différente largeur ou même des rectangles plus haut que large mais prenant la hauteur d'une cellule, connaissez vous ce genre de police? Merci, d'avance

Bonjour Venant de réaliser ce graph pour une personne d'un autre Forum, je vous le mets sur le site car je pense qu'il peut servire à d'autres. Des données en colonne B, qui servent pour le graph, chaque ligne vide permet de gerer une liste, la colonne A permet de récuperer les departs de liste...

Bonjour à tous J'ai un trou!!!! ( dans la tête.) je souhaite convertir : minutes:seconde, et centieme de seconde le tout en centieme de minute. Mon format: mm:ss,00 ma valeur 02:05,49 en centieme de minute???

Bonjour Voici un petit fichier pour le calcul des droit ANC, avant 2000 nous avions des droits supérieurs à ceux d'aujourd'hui, je me suis fais un fichier de calcul automatique avec plein de Datedif et des SI. J'essai de passer avec un sommeprod ou de simplifier cette formule...

Bonjour à tous Un petit challenge: Toutes les possibilitées d'excel pour exporter un ou plusieurs en txt. Toutes les possibilitées pour importer dans excel un ou plusieurs fichiers TXT, dans un classeur. Avec choix d'ouverture de fichier multiple. Et bien sur tout le questionnement de chaque...

Bonjour Ca peut servir aux resources humaines, ou pour les curieux. Une base de donnée évolutive Un tcd Age, un tcd Ancienneté qui se mettent à jour grace à une liste déroulante ( adaptation d'une macro de DEBRA D ) avec un graph utilisant une liste déroulante pour le choix Age ou Anc. Une...

Bonjour à TOUS Ne pas Oublier, c'est l'Anniversaire de l'Ami DULL @+ Dull "Ti pas ti pas n'arrive Grandbois" DONC Bon Anniversaire Dull Au fait c'est pas vrai ce qu'ils disent à cet endroit Ce lien n'existe plus Il est plein de soleil

Bonsoir Pas trés doué en macro!!! Ou est l'erreur dans la macro For I = 8 To 655555 If Controls("TextBox1").Value = Cells(I, 1) Then MsgBox "Vérifier ce nom semble déjà exister", vbInformation, "C'est un Doublon !!!" Controls("Textbox1").SetFocus Exit Sub End If...

Bonjour Un autre à décortiquer, Un Pareto, valeur à mettre en colonne A et B, critere de mise en evidence en C2. Le reste se fait tout seul ( avec des formules trouvés sur le Forum, comme une de Monique, une de Dugenou). J'ai mis une protection seulement pour eviter l'effacement des formules...