Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2010 Pb macro - défusionner & "remise à blanc" dans plage à ligne variable

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
J

jerome91

XLDnaute Junior
Bonjour,

J'aurais besoin de votre aide car je bloque sur une macro, j'ai testé l'enregistreur mais après ça part en boucle.

En effet, je souhaiterais via le fichier joint de données :
1) Défusionner les cellules de A2 jusqu'en bas (la fin est variable et peut aller très loin - l'utilisation d'un compteur dans la colonne Total pourrait être "la clé" car il y aura toujours une valeur)
2) Effacer toutes les valeurs de A2 à J2 jusqu'en bas du tableau (idem la fin est variable)
3) de A2 à J2 jusqu'en bas (idem fin variable) remet la mise en forme Aucune bordure & Aucun remplissage

Au final, l'objectif est de "remettre à blanc" de A2 à J2 jusqu'à la dernière ligne de la colonne Total qui est variable.

Pourriez-vous m'aider ?

Merci.

Jérôme
 

Pièces jointes

Trier par date Trier par votes
Bonjour,

Si j'ai bien compris, il faut tout effacer sauf la ligne d'entête ?
Ca devrait faire l'affaire :
Code: 
Function test() As Boolean
  ActiveWorkbook.ActiveSheet.Range("A2:J" & Range("B1000000").End(xlUp).Row).Delete
End Function
 
Vote positif 0 Vote négatif
Bonjour,

Nouvel essai :
Code: 
Function test() As Boolean
    ActiveWorkbook.ActiveSheet.Range("A2:A" & Range("B1000000").End(xlUp).Row).UnMerge
    ActiveWorkbook.ActiveSheet.Range("A2:J" & Range("B1000000").End(xlUp).Row).Borders.LineStyle = xlNone
    ActiveWorkbook.ActiveSheet.Range("A2:J" & Range("B1000000").End(xlUp).Row).Interior.Pattern = xlNone
    ActiveWorkbook.ActiveSheet.Range("A2:J" & Range("B1000000").End(xlUp).Row).ClearContents
End Function
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

N
  • Résolu(e)
Microsoft 365 Macro copier/coller entre deux tableaux structurés
3 4 5
Réponses
66
Affichages
2 K
job75
S
  • Résolu(e)
XL 2013 Copier-Coller une ligne dans tableau variable, et la manipuler.
Réponses
4
Affichages
268
StéphaneDeLà
S
L
  • Résolu(e)
Microsoft 365 Retourner l'en-tête colonne correspondante à une quantité donnée dans une ligne
Réponses
4
Affichages
306
LegVal
L
W
  • Résolu(e)
XL 2019 Somme d'éléments (retours à la ligne) dans un segment, ou plusieurs segments, horizon·tal·aux de cellules
Réponses
2
Affichages
137
Webperegrino
W
I
  • Résolu(e)
Microsoft 365 Copier-coller dans une plage avec des cellules masquées
Réponses
6
Affichages
554
sylvanu
  • Question Question
Microsoft 365 Conserver la valeur de ma variable pour l'utiliser dans un autre code
Réponses
3
Affichages
455
mapomme
J
  • Question Question
XL 2021 Macro : avoir les mois en chiffres de 1 à 12 en colonne à chaque ligne différente
Réponses
5
Affichages
472
jerome91
J
N
  • Résolu(e)
XL 2019 Macro pour copier ligne avec case à cocher liée
Réponses
12
Affichages
397
Phil69970
A
  • Résolu(e)
XL 2016 Macros sur nom de fichier variable
Réponses
5
Affichages
642
oguruma
S
  • Résolu(e)
Microsoft 365 Reporter le contenu d'une plage dans une cellule selon un ordre précis
Réponses
4
Affichages
322
sebastien176
S
U
  • Question Question
Autres incorporer une macro dans une autre macro
Réponses
5
Affichages
668
Phil69970
J
  • Question Question
XL 2010 Somme.si.ens avec positionnement plage_somme variable
Réponses
2
Affichages
678
jerome91
J
O
  • Question Question
XL 2019 Code VBA pour automatiser la programmation des rotations des ouvriers qui travaillent à temps partiel et se relaient par période de temps constante.
2 3
Réponses
35
Affichages
2 K
olivier1984
O
  • Résolu(e)
XL 2010 Remplissage cellules planning avec dates
Réponses
5
Affichages
895
Orson83
B
  • Résolu(e)
XL 2019 Format nombre dans un tableau à colonne et ligne variable
Réponses
6
Affichages
730
babie971
B
I
  • Résolu(e)
Microsoft 365 VBA EXCEL Utilisation d'une variable avec données dans un tableau
Réponses
4
Affichages
997
mapomme
D
  • Question Question
XL 2019 enregistrer le nom de mon fichier comme variable dans ma macro
Réponses
3
Affichages
637
desmonts
D
P
  • Résolu(e)
Microsoft 365 Erreur d'exécution "9" :L'indice n'appartient pas à la sélection
Réponses
9
Affichages
2 K
pelerin65
P
M
  • Résolu(e)
Microsoft 365 Récupérer données d'une autre feuille en fonction de ma selection dans une liste
Réponses
2
Affichages
867
minamas
M
B
  • Question Question
Microsoft 365 Erreur de compilation
Réponses
3
Affichages
931
oguruma
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…