OVH Cloud OVH Cloud

sélection zone

6 réponses
Avatar
cousinhub
Bonsoir,
j'ai une macro qui efface bien toutes les valeurs d'une plage de cellules,
mais je voudrais qu'elle soit utilisable sur toutes les feuilles de mon
classeur.
toutes les plages commencent à partir de la cellule A3, mais suivant les
feuilles, il y a plus ou moins de lignes ou de colonnes.
j'ai essayé avec ceci, mais cela ne fonctionne pas :
Range("A3:" & Range("IV3").End(xlToLeft).Column &
Range("A65536").End(xlUp).Row).Select
Merci pour votre aide

6 réponses

Avatar
ABED HADDOU
Bonsoir

Sub Efface()
Dim i As Long
For i = 1 To Sheets.Count
sh = Sheets(i).Name
Sheets(sh).Range("A3:IV65000").ClearContents
Next
End Sub

Abed_H




Bonsoir,
j'ai une macro qui efface bien toutes les valeurs d'une plage de cellules,
mais je voudrais qu'elle soit utilisable sur toutes les feuilles de mon
classeur.
toutes les plages commencent à partir de la cellule A3, mais suivant les
feuilles, il y a plus ou moins de lignes ou de colonnes.
j'ai essayé avec ceci, mais cela ne fonctionne pas :
Range("A3:" & Range("IV3").End(xlToLeft).Column &
Range("A65536").End(xlUp).Row).Select
Merci pour votre aide


Avatar
cousinhub
Merci pour ta réponse, mais ce n'est pas tout à fait cela que je veux.
J'ai d'autres données à droite de ces zones, à partir de la 5 ème ligne,
aussi, je ne veux effacer que celles incluses dans la plage de cellule (a3:
(soit j, soit k...)xlend...)
Merci quand même



Bonsoir

Sub Efface()
Dim i As Long
For i = 1 To Sheets.Count
sh = Sheets(i).Name
Sheets(sh).Range("A3:IV65000").ClearContents
Next
End Sub

Abed_H




Bonsoir,
j'ai une macro qui efface bien toutes les valeurs d'une plage de cellules,
mais je voudrais qu'elle soit utilisable sur toutes les feuilles de mon
classeur.
toutes les plages commencent à partir de la cellule A3, mais suivant les
feuilles, il y a plus ou moins de lignes ou de colonnes.
j'ai essayé avec ceci, mais cela ne fonctionne pas :
Range("A3:" & Range("IV3").End(xlToLeft).Column &
Range("A65536").End(xlUp).Row).Select
Merci pour votre aide




Avatar
ABED HADDOU
donc tu veux dire que tu voulais effacé la plage de a3 à iv3 ou quoi ?
je n'ai rien compris.

Abed_H



Bonsoir,
j'ai une macro qui efface bien toutes les valeurs d'une plage de cellules,
mais je voudrais qu'elle soit utilisable sur toutes les feuilles de mon
classeur.
toutes les plages commencent à partir de la cellule A3, mais suivant les
feuilles, il y a plus ou moins de lignes ou de colonnes.
j'ai essayé avec ceci, mais cela ne fonctionne pas :
Range("A3:" & Range("IV3").End(xlToLeft).Column &
Range("A65536").End(xlUp).Row).Select
Merci pour votre aide


Avatar
cousinhub
Re,
je m'explique un peu mieux :
dans chaque feuille de mon classeur, j'ai un plage de cellule remplies,
qui commence obligatoirement à la cellule "A3", mais qui peut finir en
"J15", ou "K90", ou "M51".
Je voudrais utiliser une SEULE macro, déclenchable à partir de n'importe
quelle feuille, afin d'effacer le contenu ainsi que les formats
(conditionnels ou non) de la zone de cette feuille
la macro, j'arrive à la faire, mais comment lui dire de ne sélectionner que
la zone concernée.
Je précise que les deux premières lignes sont également remplies et ne
doivent donc pas être effacées. (Selection.CurrentRegion.Select) ne convient
donc pas
Merci de ton intérêt


donc tu veux dire que tu voulais effacé la plage de a3 à iv3 ou quoi ?
je n'ai rien compris.

Abed_H



Bonsoir,
j'ai une macro qui efface bien toutes les valeurs d'une plage de cellules,
mais je voudrais qu'elle soit utilisable sur toutes les feuilles de mon
classeur.
toutes les plages commencent à partir de la cellule A3, mais suivant les
feuilles, il y a plus ou moins de lignes ou de colonnes.
j'ai essayé avec ceci, mais cela ne fonctionne pas :
Range("A3:" & Range("IV3").End(xlToLeft).Column &
Range("A65536").End(xlUp).Row).Select
Merci pour votre aide




Avatar
ABED HADDOU
donc essaie cela

Sub Efface()
Dim i As Long
For i = 1 To Sheets.Count
sh = Sheets(i).Name
Plage = InputBox("Plage consernée : ", sh)
Sheets(sh).Range(Plage).Clear
Next
End Sub

Abed_H




Re,
je m'explique un peu mieux :
dans chaque feuille de mon classeur, j'ai un plage de cellule remplies,
qui commence obligatoirement à la cellule "A3", mais qui peut finir en
"J15", ou "K90", ou "M51".
Je voudrais utiliser une SEULE macro, déclenchable à partir de n'importe
quelle feuille, afin d'effacer le contenu ainsi que les formats
(conditionnels ou non) de la zone de cette feuille
la macro, j'arrive à la faire, mais comment lui dire de ne sélectionner que
la zone concernée.
Je précise que les deux premières lignes sont également remplies et ne
doivent donc pas être effacées. (Selection.CurrentRegion.Select) ne convient
donc pas
Merci de ton intérêt


donc tu veux dire que tu voulais effacé la plage de a3 à iv3 ou quoi ?
je n'ai rien compris.

Abed_H



Bonsoir,
j'ai une macro qui efface bien toutes les valeurs d'une plage de cellules,
mais je voudrais qu'elle soit utilisable sur toutes les feuilles de mon
classeur.
toutes les plages commencent à partir de la cellule A3, mais suivant les
feuilles, il y a plus ou moins de lignes ou de colonnes.
j'ai essayé avec ceci, mais cela ne fonctionne pas :
Range("A3:" & Range("IV3").End(xlToLeft).Column &
Range("A65536").End(xlUp).Row).Select
Merci pour votre aide






Avatar
cousinhub
Merci beaucoup
Ce n'est pas tout à fait cela qu'il me fallait, je désirais que la zone soit
sélectionnée automatiquement, sans avoir à la rentrer manuellement.
Merci quand mêm pour tout le mal


donc essaie cela

Sub Efface()
Dim i As Long
For i = 1 To Sheets.Count
sh = Sheets(i).Name
Plage = InputBox("Plage consernée : ", sh)
Sheets(sh).Range(Plage).Clear
Next
End Sub

Abed_H




Re,
je m'explique un peu mieux :
dans chaque feuille de mon classeur, j'ai un plage de cellule remplies,
qui commence obligatoirement à la cellule "A3", mais qui peut finir en
"J15", ou "K90", ou "M51".
Je voudrais utiliser une SEULE macro, déclenchable à partir de n'importe
quelle feuille, afin d'effacer le contenu ainsi que les formats
(conditionnels ou non) de la zone de cette feuille
la macro, j'arrive à la faire, mais comment lui dire de ne sélectionner que
la zone concernée.
Je précise que les deux premières lignes sont également remplies et ne
doivent donc pas être effacées. (Selection.CurrentRegion.Select) ne convient
donc pas
Merci de ton intérêt


donc tu veux dire que tu voulais effacé la plage de a3 à iv3 ou quoi ?
je n'ai rien compris.

Abed_H



Bonsoir,
j'ai une macro qui efface bien toutes les valeurs d'une plage de cellules,
mais je voudrais qu'elle soit utilisable sur toutes les feuilles de mon
classeur.
toutes les plages commencent à partir de la cellule A3, mais suivant les
feuilles, il y a plus ou moins de lignes ou de colonnes.
j'ai essayé avec ceci, mais cela ne fonctionne pas :
Range("A3:" & Range("IV3").End(xlToLeft).Column &
Range("A65536").End(xlUp).Row).Select
Merci pour votre aide