Un Ami de ce merveilleux group m'a expliqué pour remettre à ZERO une cellule
Voir mon code ci-dessous et il manque encore beaucoup de cellules à remettre
à Zéro...
Mai n'est-il point possible de mettre lorsque les cellules se suivent soit
en ligne ou soit en colonne quelque chose comme G7:G16 (en colonnes) ou
G7:k7 (en ligne)
c'est pour la pratique et aussi peut-être aprés trop de commandes la ligne
fera 1mêtre 50 ...
Non je ne suis pas de Marseille, j'ai bien dit 1m50
Merci de vos infos et bonne journée.
Bernard
Mon code (de débutant)
With Worksheets("Feuil1")
.Range("D6,D8,D9,D10,D11,D12,D13,D14,D15,D16,D17,D18,D25,D26,D27,D28,D29,D30,D32,D33,D34,D35,D36,D37,D38,D39,D40,D41,D43,D44,D45,D46,D47,D48,D49").ClearContents
End With
--
Bernard FANGET Movie Room Manager
Multiplexe Cinema DECAVISION - 7 avenue de Brogny
74000 ANNECY France
Fax : 04 50 52 58 31 - Tel. : 04 50 52 58 36
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
papou
Bonjour Absolument, c'est possible. Il te reste donc à modifier : Worksheets("Feuil1").Range("G7:G16").ClearContents ou bien Worksheets("Feuil1").Range("G7:K7").ClearContents
Cordialement Pascal
"Cinémas Décavision" a écrit dans le message de news:
Bonjour Amis Pros d'Excel 2000,
Un Ami de ce merveilleux group m'a expliqué pour remettre à ZERO une cellule Voir mon code ci-dessous et il manque encore beaucoup de cellules à remettre à Zéro...
Mai n'est-il point possible de mettre lorsque les cellules se suivent soit en ligne ou soit en colonne quelque chose comme G7:G16 (en colonnes) ou G7:k7 (en ligne) c'est pour la pratique et aussi peut-être aprés trop de commandes la ligne fera 1mêtre 50 ... Non je ne suis pas de Marseille, j'ai bien dit 1m50
Merci de vos infos et bonne journée. Bernard
Mon code (de débutant)
With Worksheets("Feuil1")
.Range("D6,D8,D9,D10,D11,D12,D13,D14,D15,D16,D17,D18,D25,D26,D27,D28,D29,D30,D32,D33,D34,D35,D36,D37,D38,D39,D40,D41,D43,D44,D45,D46,D47,D48,D49").ClearContents End With
-- Bernard FANGET Movie Room Manager Multiplexe Cinema DECAVISION - 7 avenue de Brogny 74000 ANNECY France Fax : 04 50 52 58 31 - Tel. : 04 50 52 58 36
http://www.decavision.com/
Bonjour
Absolument, c'est possible.
Il te reste donc à modifier :
Worksheets("Feuil1").Range("G7:G16").ClearContents
ou bien
Worksheets("Feuil1").Range("G7:K7").ClearContents
Cordialement
Pascal
"Cinémas Décavision" <pdg@decavision.fr> a écrit dans le message de news:
OfjBAL2OKHA.4580@TK2MSFTNGP06.phx.gbl...
Bonjour Amis Pros d'Excel 2000,
Un Ami de ce merveilleux group m'a expliqué pour remettre à ZERO une
cellule
Voir mon code ci-dessous et il manque encore beaucoup de cellules à
remettre
à Zéro...
Mai n'est-il point possible de mettre lorsque les cellules se suivent soit
en ligne ou soit en colonne quelque chose comme G7:G16 (en colonnes) ou
G7:k7 (en ligne)
c'est pour la pratique et aussi peut-être aprés trop de commandes la ligne
fera 1mêtre 50 ...
Non je ne suis pas de Marseille, j'ai bien dit 1m50
Merci de vos infos et bonne journée.
Bernard
Mon code (de débutant)
With Worksheets("Feuil1")
.Range("D6,D8,D9,D10,D11,D12,D13,D14,D15,D16,D17,D18,D25,D26,D27,D28,D29,D30,D32,D33,D34,D35,D36,D37,D38,D39,D40,D41,D43,D44,D45,D46,D47,D48,D49").ClearContents
End With
--
Bernard FANGET Movie Room Manager
Multiplexe Cinema DECAVISION - 7 avenue de Brogny
74000 ANNECY France
Fax : 04 50 52 58 31 - Tel. : 04 50 52 58 36
Bonjour Absolument, c'est possible. Il te reste donc à modifier : Worksheets("Feuil1").Range("G7:G16").ClearContents ou bien Worksheets("Feuil1").Range("G7:K7").ClearContents
Cordialement Pascal
"Cinémas Décavision" a écrit dans le message de news:
Bonjour Amis Pros d'Excel 2000,
Un Ami de ce merveilleux group m'a expliqué pour remettre à ZERO une cellule Voir mon code ci-dessous et il manque encore beaucoup de cellules à remettre à Zéro...
Mai n'est-il point possible de mettre lorsque les cellules se suivent soit en ligne ou soit en colonne quelque chose comme G7:G16 (en colonnes) ou G7:k7 (en ligne) c'est pour la pratique et aussi peut-être aprés trop de commandes la ligne fera 1mêtre 50 ... Non je ne suis pas de Marseille, j'ai bien dit 1m50
Merci de vos infos et bonne journée. Bernard
Mon code (de débutant)
With Worksheets("Feuil1")
.Range("D6,D8,D9,D10,D11,D12,D13,D14,D15,D16,D17,D18,D25,D26,D27,D28,D29,D30,D32,D33,D34,D35,D36,D37,D38,D39,D40,D41,D43,D44,D45,D46,D47,D48,D49").ClearContents End With
-- Bernard FANGET Movie Room Manager Multiplexe Cinema DECAVISION - 7 avenue de Brogny 74000 ANNECY France Fax : 04 50 52 58 31 - Tel. : 04 50 52 58 36
http://www.decavision.com/
Corto
Bonjour Cinémas Décavision, Tu peux aussi taper [Feuil1!G7:G16].ClearContent
Corto
Cinémas Décavision a écrit :
Bonjour Amis Pros d'Excel 2000,
Un Ami de ce merveilleux group m'a expliqué pour remettre à ZERO un e cellule Voir mon code ci-dessous et il manque encore beaucoup de cellules à r emettre à Zéro...
Mai n'est-il point possible de mettre lorsque les cellules se suivent s oit en ligne ou soit en colonne quelque chose comme G7:G16 (en colonnes) ou G7:k7 (en ligne) c'est pour la pratique et aussi peut-être aprés trop de commandes l a ligne fera 1mêtre 50 ... Non je ne suis pas de Marseille, j'ai bien dit 1m50
Merci de vos infos et bonne journée. Bernard
Mon code (de débutant)
With Worksheets("Feuil1") .Range("D6,D8,D9,D10,D11,D12,D13,D14,D15,D16,D17,D18,D25,D26,D27,D2 8,D29,D30,D32,D33,D34,D35,D36,D37,D38,D39,D40,D41,D43,D44,D45,D46,D47,D48 ,D49").ClearContents End With
Bonjour Cinémas Décavision,
Tu peux aussi taper [Feuil1!G7:G16].ClearContent
Corto
Cinémas Décavision a écrit :
Bonjour Amis Pros d'Excel 2000,
Un Ami de ce merveilleux group m'a expliqué pour remettre à ZERO un e cellule
Voir mon code ci-dessous et il manque encore beaucoup de cellules à r emettre
à Zéro...
Mai n'est-il point possible de mettre lorsque les cellules se suivent s oit
en ligne ou soit en colonne quelque chose comme G7:G16 (en colonnes) ou
G7:k7 (en ligne)
c'est pour la pratique et aussi peut-être aprés trop de commandes l a ligne
fera 1mêtre 50 ...
Non je ne suis pas de Marseille, j'ai bien dit 1m50
Merci de vos infos et bonne journée.
Bernard
Mon code (de débutant)
With Worksheets("Feuil1")
.Range("D6,D8,D9,D10,D11,D12,D13,D14,D15,D16,D17,D18,D25,D26,D27,D2 8,D29,D30,D32,D33,D34,D35,D36,D37,D38,D39,D40,D41,D43,D44,D45,D46,D47,D48 ,D49").ClearContents
End With
Bonjour Cinémas Décavision, Tu peux aussi taper [Feuil1!G7:G16].ClearContent
Corto
Cinémas Décavision a écrit :
Bonjour Amis Pros d'Excel 2000,
Un Ami de ce merveilleux group m'a expliqué pour remettre à ZERO un e cellule Voir mon code ci-dessous et il manque encore beaucoup de cellules à r emettre à Zéro...
Mai n'est-il point possible de mettre lorsque les cellules se suivent s oit en ligne ou soit en colonne quelque chose comme G7:G16 (en colonnes) ou G7:k7 (en ligne) c'est pour la pratique et aussi peut-être aprés trop de commandes l a ligne fera 1mêtre 50 ... Non je ne suis pas de Marseille, j'ai bien dit 1m50
Merci de vos infos et bonne journée. Bernard
Mon code (de débutant)
With Worksheets("Feuil1") .Range("D6,D8,D9,D10,D11,D12,D13,D14,D15,D16,D17,D18,D25,D26,D27,D2 8,D29,D30,D32,D33,D34,D35,D36,D37,D38,D39,D40,D41,D43,D44,D45,D46,D47,D48 ,D49").ClearContents End With
Modeste
Bonsour® Cinémas Décavision avec ferveur ;o))) vous nous disiez :
Mai n'est-il point possible de mettre lorsque les cellules se suivent soit en ligne ou soit en colonne quelque chose comme G7:G16 (en colonnes) ou G7:k7 (en ligne)
il suffit d'essayer ;o)))
With Worksheets("Feuil1") .Range("D6, D8:D18, D25:D30, D32:D41, D43:D49").ClearContents End With
Bonsour® Cinémas Décavision avec ferveur ;o))) vous nous disiez :
Mai n'est-il point possible de mettre lorsque les cellules se suivent
soit
en ligne ou soit en colonne quelque chose comme G7:G16 (en colonnes)
ou
G7:k7 (en ligne)
il suffit d'essayer ;o)))
With Worksheets("Feuil1")
.Range("D6, D8:D18, D25:D30, D32:D41, D43:D49").ClearContents
End With
Bonsour® Cinémas Décavision avec ferveur ;o))) vous nous disiez :
Mai n'est-il point possible de mettre lorsque les cellules se suivent soit en ligne ou soit en colonne quelque chose comme G7:G16 (en colonnes) ou G7:k7 (en ligne)
il suffit d'essayer ;o)))
With Worksheets("Feuil1") .Range("D6, D8:D18, D25:D30, D32:D41, D43:D49").ClearContents End With
Cinémas Décavision
Merci à tous trois pour ces réponses qui vont m'aider énormément....
Bonne sorée à tous ce merveilleux groupe.
Bernard
-- Bernard FANGET Movie Room Manager Multiplexe Cinema DECAVISION - 7 avenue de Brogny 74000 ANNECY France Fax : 04 50 52 58 31 - Tel. : 04 50 52 58 36
http://www.decavision.com/
Merci à tous trois pour ces réponses qui vont m'aider énormément....
Bonne sorée à tous ce merveilleux groupe.
Bernard
--
Bernard FANGET Movie Room Manager
Multiplexe Cinema DECAVISION - 7 avenue de Brogny
74000 ANNECY France
Fax : 04 50 52 58 31 - Tel. : 04 50 52 58 36