Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Re : Macro détail de modification
Bien sur, vous pouvez modifier le code de cette façon :
Dim cel As Range
Dim i As Long
i=1
For Each cel In Sheets("BD").Range("A1:A7")
If cel.Font.Bold = True Then
Sheets("Feuil3").Range("A" & i) = cel.Value
i=i+1
End If...
Re : Range variables + delete
Vous pouvez donc définir une variable qui contiendra la dernière ligne remplie mais qui est au maximum égale à 11 :
Dim nb as Long
nb = WorksheetFunction.Min(Range("A2").End(xlDown).Row,11)
Range("A2:A" & nb).select
Re : Range variables + delete
Je n'ai pas trop compris votre critère de sélection..
Vous voulez sélectionner les cellules remplies entre A2 et A11 et ne jamais dépasser A11?
Re : Range variables + delete
J'ai lu trop rapidement votre message et j'ai sauté une étape..
Ca sera mieux comme ca :
Range("A2:A" & Range("A2").End(xlDown).Row).select
Re : Macro détail de modification
Bonjour,
Dans votre macro, vous regardez si toute la plage est en gras ou non.
Il faut réaliser une boucle sur la plage et regarder si chaque cellule est en gras ou non.
Vous pouvez essayer quelque chose comme ca :
Dim cel As Range
Dim i As Long
i=1
For...
Re : Problème de boucle excel
Il y avait plusieurs problème dans ton code.
Déjà tu as inversé les deux boucles que tu utilises.
Ensuite tu définis j=41 dans la boucle for, ce qui fait qu'elle est a chaque fois redéfini à 41, et tes données importées se copient les unes sur les autres.
Tu...
Re : Problème de boucle excel
Bonjour,
Tu comptes les lignes à partir de la ligne 13 et dans ta boucle tu commences ligne 1, c'est normal?
Un petit exemple de fichier pour mieux comprendre ton problème?
Re : Cherche un petite macro pour déplacement
Bonjour Philippe,
C'est tout à fait possible et voici une petite macro qui devrait répondre à vos besoins.
Re : Capter une information à la fermeture d'un classeur.
Bonjour Coco,
Voici un fichier avec la macro modifiée.
Elle propose à l'utilisateur d'enregistrer ou non le fichier et si celui ci dit non, une nouvelle boite de dialogue s'ouvre pour lui demander de confirmer.
Et la boite de...
Re : Capter une information à la fermeture d'un classeur.
Bonjour coco,
Vous pouvez recopier ce code dans This Workbook :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
End Sub
Le fichier sera sauvegardé automatiquement lors de la fermeture.
Cordialement,
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.