OVH Cloud OVH Cloud

Effacer le contenu des cellules

18 réponses
Avatar
Guido
Bonsoir,
Le bouton clic dans la "feuil Exercice2" me permet de générer par macro
(aimablement donnée par AV) des mots aléatoirement dans des cellules. C'est
génial. Cela fonctionne super. Il me permet de faire mes exercices. J'aurais
voulu pouvoir utiliser mon PC et pouvoir inscrire les réponses dans les
cellules correspondantes. Mais lorsque je génère de nouveaux mots, qui peut
me donner une solution pour que les mots incrits par moi, s'effacent. Je
laisse une copie du fichier pour visualiser le tableau.
http://cjoint.com/?dowgqlOCrv
Merci à vous par avance.
Guido

10 réponses

1 2
Avatar
JpPradier
Bonsoir Guido

Quelles sont les cellules que tu veux effacer ?

j-p
Avatar
Guido
JP m'a répondu aimablement:

Bonsoir Guido

Quelles sont les cellules que tu veux effacer ?

j-p



Bonsoir JP,
Au lieu d'imprimer et de faire sur feuille de papier, je voudrais faire les
exercices directement sur le PC. donc à chaque changement des mots (allemand
ou français), je voudrais qu'il n'y aie que les données que j'ai inscrite
moi-même (en français ou en allemand) qui s'effacent. Celles générées par le
bouton devraient rester.
Merci de ton aide.

Avatar
JpPradier
Ok
Au debut de la macro zzz2, tu rajoutes cette ligne :

['Feuille exercice2'!A2:H115].ClearContents

j-p
Avatar
Guido
JP m'a donné la réponse à ma question :

Ok
Au debut de la macro zzz2, tu rajoutes cette ligne :

['Feuille exercice2'!A2:H115].ClearContents

j-p


Un grand merci à toi. Cela parrait toujours si simple.
Guido

Avatar
Guido
JP,
Saurais-tu comment supprimer uniquement dans la feuille Exercice 2 la saisie
automatique.
Outil option le fait, mais c'est pour Excel, et non pour la feuille
uniquement.
Merci encore pour avant.
Guido
Avatar
JpPradier
Salut Guido

Je ne crois pas qu'on puisse le faire pour une seule feuille. Tu vas etre obligé de le
faire pour tout le classeur.
Tu peux éventuellement le faire automatiquement juste pour ce classeur :
Dans le module ThisWorkbook, tu colles ça :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.EnableAutoComplete = True
End Sub

Private Sub Workbook_Open()
Application.EnableAutoComplete = False
End Sub

Ca enleve la saisie semi-auto à l'ouverture et ça la remet à la fermeture.

j-p
Avatar
Nadia.b
Bonjour JpPradier
Salut Guido
Je ne crois pas qu'on puisse le faire pour une seule feuille. Tu vas etre
obligé de le
faire pour tout le classeur.
Tu peux éventuellement le faire automatiquement juste pour ce classeur :
Dans le module ThisWorkbook, tu colles ça :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.EnableAutoComplete = True
End Sub
Private Sub Workbook_Open()
Application.EnableAutoComplete = False
End Sub
Ca enleve la saisie semi-auto à l'ouverture et ça la remet à la fermeture.
j-p


J'ai placé le code dans thisworkbook, cela n'a pas fonctionné. J'ai aussi
essayé de coller les textes sur plus ou moins toutes les autres possibilités
que je connaisse. Cela n'a pas donné de résultat.
Salutations et bonne matinée
Guido

Avatar
JpPradier
Tu as fermé et reouvert ton classeur après ?
Sinon, je n'ai pas d'autre idée.

j-p
Avatar
Nadia.b
Oui, mais cela ne fonctionne pas.
Sur le PC de l'école nous avons XP pro, et sur celui de ma femme W2k, et moi
aussi. Est-ce que ce serait ça le problème ?, incompatibilité entre les
systèmes ?
Désolé que cela ne marche pas.
Merci quand même
Guido
"JpPradier" a écrit dans le message
de news:
Tu as fermé et reouvert ton classeur après ?
Sinon, je n'ai pas d'autre idée.

j-p



Avatar
AV
| Saurais-tu comment supprimer uniquement dans la feuille Exercice 2 la saisie
| automatique.

Dans le module de la feuille "Exercice 2" :

Private Sub Worksheet_Activate()
Application.EnableAutoComplete = False
End Sub

Private Sub Worksheet_Deactivate()
Application.EnableAutoComplete = True
End Sub

AV
1 2