A voir également:
- Compteur excel hebdomadaire
- Compteur électrique - Guide
- Liste déroulante excel - Guide
- Comment ralentir un compteur linky forum - Accueil - Objets connectés
- Si et excel - Guide
- Aller à la ligne excel - Guide
2 réponses
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 247
26 févr. 2011 à 15:38
26 févr. 2011 à 15:38
Bonjour,
Proposition :
un double-clic sur le nom enregistre date et heure dans la colonne de la semaine en cours.
Le lundi, la semaine précédente est historisée et une colonne vierge est préparée.
Nettoie quand il faut les dernières colonnes (sur excel 2003 : 256 colonnes possibles, mais bon, ça laisse 5 ans possibles...)
Présence.xls
eric
Proposition :
un double-clic sur le nom enregistre date et heure dans la colonne de la semaine en cours.
Le lundi, la semaine précédente est historisée et une colonne vierge est préparée.
Nettoie quand il faut les dernières colonnes (sur excel 2003 : 256 colonnes possibles, mais bon, ça laisse 5 ans possibles...)
Présence.xls
eric
Bonjour eriiic, et merci d'avoir pu répondre aussi vite.
Finalement je vais opter pour un userform, qui remplira une feuille d'un classeur excel. Je le ré-initialiserait manuellement.
J'ai créé le userform avec 3 Textbox :
- Classe
- Nom
- Prenom
Et avec un bouton enregistrer. Le soucis : j'arrive à remplir une seule ligne seulement.
Voici mon code :
Sheets("Base").Range("C2").Value = TextBox1.Value
Sheets("Base").Range("A2").Value = TextBox2.Value
Sheets("Base").Range("B2").Value = TextBox3.Value
Comment faire pour remplir la ligne suivante, et effacer le contenu des textbox ?
Je précise que j'ai longuement cherché sur internet mais que je n'ai pas vraiment compris comment, ni pourquoi ça ne fonctionne pas. La plupart des tuto sont prévus pour office 2000 et 2002. Peut-être un problème de compatibilité ?
HELP!
Finalement je vais opter pour un userform, qui remplira une feuille d'un classeur excel. Je le ré-initialiserait manuellement.
J'ai créé le userform avec 3 Textbox :
- Classe
- Nom
- Prenom
Et avec un bouton enregistrer. Le soucis : j'arrive à remplir une seule ligne seulement.
Voici mon code :
Sheets("Base").Range("C2").Value = TextBox1.Value
Sheets("Base").Range("A2").Value = TextBox2.Value
Sheets("Base").Range("B2").Value = TextBox3.Value
Comment faire pour remplir la ligne suivante, et effacer le contenu des textbox ?
Je précise que j'ai longuement cherché sur internet mais que je n'ai pas vraiment compris comment, ni pourquoi ça ne fonctionne pas. La plupart des tuto sont prévus pour office 2000 et 2002. Peut-être un problème de compatibilité ?
HELP!
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 247
27 févr. 2011 à 12:12
27 févr. 2011 à 12:12
Bonjour,
dernière ligne utilisée de la colonne A :
derlig=Sheets("Base").[A65536].end(xlup).row
donc remplir :
Sheets("Base").cells(derlig+1,1)=TextBox1.Value
Vider :
TextBox1.Value=""
ajouter devant nom_du_userform. si besoin
eric
dernière ligne utilisée de la colonne A :
derlig=Sheets("Base").[A65536].end(xlup).row
donc remplir :
Sheets("Base").cells(derlig+1,1)=TextBox1.Value
Vider :
TextBox1.Value=""
ajouter devant nom_du_userform. si besoin
eric