Si la feuille est visible il est impératif quelle soit active
***** NON
Comment effacer une plage de cellules sur une feuille non active et non masquée ??
Ceci efface la plage A1:AX10 dans tous les cas (visible , non visible, cachée, non cachée, active, non active)
'------------------- With Sheets("feuil1") Range(.Cells(1, 1), .Cells(10, 50)).ClearContents End With '***** OU ***** With Sheets("feuil1") .Range("a1:ax10").ClearContents End With '----------------- -- Salutations JJ
"Difoul56" a écrit dans le message de news: %
Bonjour,
Ok ça marche mais Si la feuille est visible il est impératif quelle soit active
With Sheets("feuil1") .Visible = True .Range(.Cells(1, 1), .Cells(10, 50)).ClearContents End With
Comment effacer une plage de cellules sur une feuille non active et non masquée ??
Merci pour votre aide
JP
"Jacky" a écrit dans le message de news:
Bonsoir,
Plusieurs possibilités '1) '------------ Sheets("feuil1").Visible = False Sheets("feuil1").Range(Sheets("feuil1").Cells(1, 1), Sheets("feuil1").Cells(1, 50)).ClearContents '--------------- '2) ------------- Sheets("feuil1").Visible = False Sheets("feuil1").Range("a1:ax1").ClearContents '-------------- '3) -'------------- With Sheets("feuil1") .Visible = False .Range(.Cells(1, 1), .Cells(1, 50)).ClearContents End With '-------------- -- Salutations JJ
"Difoul56" a écrit dans le message de news:
Bonjour,
Je cherche à effacer des cellules dans une feuille masquée.
Si la feuille est visible il est impératif quelle soit active
***** NON
Comment effacer une plage de cellules sur une feuille non active et non
masquée ??
Ceci efface la plage A1:AX10 dans tous les cas (visible , non visible,
cachée, non cachée, active, non active)
'-------------------
With Sheets("feuil1")
Range(.Cells(1, 1), .Cells(10, 50)).ClearContents
End With
'***** OU *****
With Sheets("feuil1")
.Range("a1:ax10").ClearContents
End With
'-----------------
--
Salutations
JJ
"Difoul56" <difoul56@yahoo.fr> a écrit dans le message de news:
%23k7CJKauJHA.2596@TK2MSFTNGP02.phx.gbl...
Bonjour,
Ok ça marche mais
Si la feuille est visible il est impératif quelle soit active
With Sheets("feuil1")
.Visible = True
.Range(.Cells(1, 1), .Cells(10, 50)).ClearContents
End With
Comment effacer une plage de cellules sur une feuille non active et non
masquée ??
Merci pour votre aide
JP
"Jacky" <Dupond@marcel.fr> a écrit dans le message de news:
u2bf096tJHA.5516@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Plusieurs possibilités
'1)
'------------
Sheets("feuil1").Visible = False
Sheets("feuil1").Range(Sheets("feuil1").Cells(1, 1),
Sheets("feuil1").Cells(1, 50)).ClearContents
'---------------
'2)
-------------
Sheets("feuil1").Visible = False
Sheets("feuil1").Range("a1:ax1").ClearContents
'--------------
'3)
-'-------------
With Sheets("feuil1")
.Visible = False
.Range(.Cells(1, 1), .Cells(1, 50)).ClearContents
End With
'--------------
--
Salutations
JJ
"Difoul56" <difoul56@yahoo.fr> a écrit dans le message de news:
eWMg5f6tJHA.4324@TK2MSFTNGP05.phx.gbl...
Bonjour,
Je cherche à effacer des cellules dans une feuille masquée.
Si la feuille est visible il est impératif quelle soit active
***** NON
Comment effacer une plage de cellules sur une feuille non active et non masquée ??
Ceci efface la plage A1:AX10 dans tous les cas (visible , non visible, cachée, non cachée, active, non active)
'------------------- With Sheets("feuil1") Range(.Cells(1, 1), .Cells(10, 50)).ClearContents End With '***** OU ***** With Sheets("feuil1") .Range("a1:ax10").ClearContents End With '----------------- -- Salutations JJ
"Difoul56" a écrit dans le message de news: %
Bonjour,
Ok ça marche mais Si la feuille est visible il est impératif quelle soit active
With Sheets("feuil1") .Visible = True .Range(.Cells(1, 1), .Cells(10, 50)).ClearContents End With
Comment effacer une plage de cellules sur une feuille non active et non masquée ??
Merci pour votre aide
JP
"Jacky" a écrit dans le message de news:
Bonsoir,
Plusieurs possibilités '1) '------------ Sheets("feuil1").Visible = False Sheets("feuil1").Range(Sheets("feuil1").Cells(1, 1), Sheets("feuil1").Cells(1, 50)).ClearContents '--------------- '2) ------------- Sheets("feuil1").Visible = False Sheets("feuil1").Range("a1:ax1").ClearContents '-------------- '3) -'------------- With Sheets("feuil1") .Visible = False .Range(.Cells(1, 1), .Cells(1, 50)).ClearContents End With '-------------- -- Salutations JJ
"Difoul56" a écrit dans le message de news:
Bonjour,
Je cherche à effacer des cellules dans une feuille masquée.
Si la feuille est visible il est impératif quelle soit active
***** NON
Comment effacer une plage de cellules sur une feuille non active et non masquée ??
Ceci efface la plage A1:AX10 dans tous les cas (visible , non visible, cachée, non cachée, active, non active)
'------------------- With Sheets("feuil1") Range(.Cells(1, 1), .Cells(10, 50)).ClearContents End With '***** OU ***** With Sheets("feuil1") .Range("a1:ax10").ClearContents End With '----------------- -- Salutations JJ
"Difoul56" a écrit dans le message de news: %
Bonjour,
Ok ça marche mais Si la feuille est visible il est impératif quelle soit active
With Sheets("feuil1") .Visible = True .Range(.Cells(1, 1), .Cells(10, 50)).ClearContents End With
Comment effacer une plage de cellules sur une feuille non active et non masquée ??
Merci pour votre aide
JP
"Jacky" a écrit dans le message de news:
Bonsoir,
Plusieurs possibilités '1) '------------ Sheets("feuil1").Visible = False Sheets("feuil1").Range(Sheets("feuil1").Cells(1, 1), Sheets("feuil1").Cells(1, 50)).ClearContents '--------------- '2) ------------- Sheets("feuil1").Visible = False Sheets("feuil1").Range("a1:ax1").ClearContents '-------------- '3) -'------------- With Sheets("feuil1") .Visible = False .Range(.Cells(1, 1), .Cells(1, 50)).ClearContents End With '-------------- -- Salutations JJ
"Difoul56" a écrit dans le message de news:
Bonjour,
Je cherche à effacer des cellules dans une feuille masquée.
"Jacky" <Dupond@marcel.fr> a écrit dans le message de news:
e$4VSJbuJHA.4068@TK2MSFTNGP03.phx.gbl...
Re...
Si la feuille est visible il est impératif quelle soit active
***** NON
Comment effacer une plage de cellules sur une feuille non active et non
masquée ??
Ceci efface la plage A1:AX10 dans tous les cas (visible , non visible,
cachée, non cachée, active, non active)
'-------------------
With Sheets("feuil1")
Range(.Cells(1, 1), .Cells(10, 50)).ClearContents
End With
'***** OU *****
With Sheets("feuil1")
.Range("a1:ax10").ClearContents
End With
'-----------------
--
Salutations
JJ
"Difoul56" <difoul56@yahoo.fr> a écrit dans le message de news:
%23k7CJKauJHA.2596@TK2MSFTNGP02.phx.gbl...
Bonjour,
Ok ça marche mais
Si la feuille est visible il est impératif quelle soit active
With Sheets("feuil1")
.Visible = True
.Range(.Cells(1, 1), .Cells(10, 50)).ClearContents
End With
Comment effacer une plage de cellules sur une feuille non active et non
masquée ??
Merci pour votre aide
JP
"Jacky" <Dupond@marcel.fr> a écrit dans le message de news:
u2bf096tJHA.5516@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Plusieurs possibilités
'1)
'------------
Sheets("feuil1").Visible = False
Sheets("feuil1").Range(Sheets("feuil1").Cells(1, 1),
Sheets("feuil1").Cells(1, 50)).ClearContents
'---------------
'2)
-------------
Sheets("feuil1").Visible = False
Sheets("feuil1").Range("a1:ax1").ClearContents
'--------------
'3)
-'-------------
With Sheets("feuil1")
.Visible = False
.Range(.Cells(1, 1), .Cells(1, 50)).ClearContents
End With
'--------------
--
Salutations
JJ
"Difoul56" <difoul56@yahoo.fr> a écrit dans le message de news:
eWMg5f6tJHA.4324@TK2MSFTNGP05.phx.gbl...
Bonjour,
Je cherche à effacer des cellules dans une feuille masquée.
Si la feuille est visible il est impératif quelle soit active
***** NON
Comment effacer une plage de cellules sur une feuille non active et non masquée ??
Ceci efface la plage A1:AX10 dans tous les cas (visible , non visible, cachée, non cachée, active, non active)
'------------------- With Sheets("feuil1") Range(.Cells(1, 1), .Cells(10, 50)).ClearContents End With '***** OU ***** With Sheets("feuil1") .Range("a1:ax10").ClearContents End With '----------------- -- Salutations JJ
"Difoul56" a écrit dans le message de news: %
Bonjour,
Ok ça marche mais Si la feuille est visible il est impératif quelle soit active
With Sheets("feuil1") .Visible = True .Range(.Cells(1, 1), .Cells(10, 50)).ClearContents End With
Comment effacer une plage de cellules sur une feuille non active et non masquée ??
Merci pour votre aide
JP
"Jacky" a écrit dans le message de news:
Bonsoir,
Plusieurs possibilités '1) '------------ Sheets("feuil1").Visible = False Sheets("feuil1").Range(Sheets("feuil1").Cells(1, 1), Sheets("feuil1").Cells(1, 50)).ClearContents '--------------- '2) ------------- Sheets("feuil1").Visible = False Sheets("feuil1").Range("a1:ax1").ClearContents '-------------- '3) -'------------- With Sheets("feuil1") .Visible = False .Range(.Cells(1, 1), .Cells(1, 50)).ClearContents End With '-------------- -- Salutations JJ
"Difoul56" a écrit dans le message de news:
Bonjour,
Je cherche à effacer des cellules dans une feuille masquée.