Contenu récent par youky(BJ)

Bonjour, A tester, si erreur dans les accents faut rectifier ou procéder avec un Array Bruno Sub Creation() Dim WsP As Worksheet Dim k% Set WsP = ThisWorkbook.Worksheets("Paramètre") For k = 1 To 12 If LCase(WsP.[C3]) = Format(CDate("15/" & k & "/2000"), "mmmm") Then année =...

En VBA aller dans les menus du haut et ...... Affichage >fenêtre exécution

Bonjour mettre la formule ou elle doit aller et garder la selection sur la cellule en vba affichier la fenêtre exécution Tapper ?selection.FormulaR1C1 et faire Enter cela donne en fonction de la selection =IF(R[2]C[-4]="","",R[2]C[3]-R[2]C[2]) Bruno

Reviens ici si problème Avec une BD ou l'on vois les entêtes qu'il faut rechercher. Bruno

Dans le doute j'ai fait aussi les étiquettes par ligne sur le même fichier Donc on peut choisir son modèle d'étiquettes. Il faut activer les macros Bruno

Bonjour tous, Un fichier exemple évite de tout se retaper sans bien savoir ou l'on va. Voici ce que j'ai fait malgrés avoir bien hésité . . . Bruno

Peut être comme ceci car pas trop compris la demande bas = Cells(Rows.Count, Range(deb) .Column).End(3).Row Bruno

Hello, pour trouver la dernière ligne de la cellule B3 bas = Cells(Rows.Count, [B3].Column).End(3).Row pour trouver la dernière colonne de la ligne 1 col = Cells(1, Columns.Count).End(1).Column Bruno

Bonjour, Dans le même USF Bruno

Bonjour, Au cas ou vous passez à coté . . . Il faut selectionner tout votre tableau et choisir la colonne à trier Sinon vous triez que la colonne et tout est faux et décalé Bruno

J'avais fait ces modifs et aussi les explications alors je mets. Les cases à cocher sont pas gérables et aucun événement en macro alors on fait autrement. La macro gère bien les choix, le tout par double_click Bruno

Et . . . . encore une nouvelle version Amélioration si tout est bon la cellule en col P se mets en vert, sinon rouge si un jaune ou rouge en H Bruno

Je remets un nouveau fichier car j'avais pas compris tout De plus pas clair les explications . . . Bruno

Bonjour, Bien du mal tu as eu pour mettre tout les cheklist que je supprime J'ai mis une écriture Webding la macro mets "n" qui fait un rond J'ai aussi mis un encard explication Le tout par double-click Bruno

Bonjour, Sans conviction . . . . essayez de mettre la propriété du bouton TakeFocusOnClik = False au lieu de True Bruno