Macro Date et macro heure avec double clic
Fermé
Adrien
-
11 avril 2021 à 18:38
yclik Messages postés 3764 Date d'inscription vendredi 25 juillet 2014 Statut Membre Dernière intervention 14 février 2025 - 12 avril 2021 à 20:12
yclik Messages postés 3764 Date d'inscription vendredi 25 juillet 2014 Statut Membre Dernière intervention 14 février 2025 - 12 avril 2021 à 20:12
A voir également:
- Macro Date et macro heure avec double clic
- Double ecran - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Whatsapp double sim - Guide
- Macro word - Guide
- Jitbit macro recorder - Télécharger - Confidentialité
3 réponses
yclik
Messages postés
3764
Date d'inscription
vendredi 25 juillet 2014
Statut
Membre
Dernière intervention
14 février 2025
1 535
11 avril 2021 à 19:42
11 avril 2021 à 19:42
Bonsoir
voir la macro date et heure
voir la macro date et heure
Merci beaucoup.
J'ai récupérer les codes et ainsi, je peux mettre de nouveau les macros.
Par contre, j'aimerais que lorsque l'on double clic de nouveau sur la cellule où figure l'heure, celle-ci disparaisse. Que dois-je ajouter au code et à quelle endroit surtout ?
Merci pour vos réponses.
J'ai récupérer les codes et ainsi, je peux mettre de nouveau les macros.
Par contre, j'aimerais que lorsque l'on double clic de nouveau sur la cellule où figure l'heure, celle-ci disparaisse. Que dois-je ajouter au code et à quelle endroit surtout ?
Merci pour vos réponses.
yclik
Messages postés
3764
Date d'inscription
vendredi 25 juillet 2014
Statut
Membre
Dernière intervention
14 février 2025
1 535
12 avril 2021 à 20:12
12 avril 2021 à 20:12
Bonsoir
tester macro à associer à un bouton (Source)
tester macro à associer à un bouton (Source)
sub vide
dim document as object
dim oSheet as object
dim oCell as object
' nom de la feuille = feuille1
oSheet = ThisComponent.sheets.GetByName("feuille1")
oCell = oSheet.getCellRangeByName("E5")
oCell.clearContents(_
com.sun.star.sheet.CellFlags.VALUE + _
com.sun.star.sheet.CellFlags.DATETIME + _
com.sun.star.sheet.CellFlags.STRING + _
com.sun.star.sheet.CellFlags.ANNOTATION + _
com.sun.star.sheet.CellFlags.FORMULA + _
com.sun.star.sheet.CellFlags.HARDATTR + _
com.sun.star.sheet.CellFlags.STYLES + _
com.sun.star.sheet.CellFlags.OBJECTS + _
com.sun.star.sheet.CellFlags.EDITATTR)
end sub