Paramétrage chiffre en heure automatiquement
Fermé
Mickael
-
22 déc. 2021 à 20:18
Mike0139 Messages postés 26 Date d'inscription jeudi 8 mars 2018 Statut Membre Dernière intervention 4 janvier 2022 - 4 janv. 2022 à 09:44
Mike0139 Messages postés 26 Date d'inscription jeudi 8 mars 2018 Statut Membre Dernière intervention 4 janvier 2022 - 4 janv. 2022 à 09:44
A voir également:
- Paramétrage chiffre en heure automatiquement
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Excel trier par ordre croissant chiffre - Guide
- Application pour écrire les chiffre en lettre - Télécharger - Outils professionnels
- Colissimo heure de livraison après-midi - Forum Consommation & Internet
3 réponses
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 414
22 déc. 2021 à 21:06
22 déc. 2021 à 21:06
ça risque d'être difficile de faire la différence par exemple avec 112 entre 1:12 et 11:02 ou encore 11:20
non?
crdlmnt
non?
crdlmnt
Mike0139
Messages postés
26
Date d'inscription
jeudi 8 mars 2018
Statut
Membre
Dernière intervention
4 janvier 2022
4 janv. 2022 à 09:44
4 janv. 2022 à 09:44
Hello,
dans ma théorie, 112 représenterait 1:12, pour afficher 11:02, j'aurais souhaité taper 1102 par exemple :)
Merci du retour en tout cas!
dans ma théorie, 112 représenterait 1:12, pour afficher 11:02, j'aurais souhaité taper 1102 par exemple :)
Merci du retour en tout cas!
RainbowSix
Messages postés
19
Date d'inscription
vendredi 4 janvier 2019
Statut
Membre
Dernière intervention
31 décembre 2021
8
22 déc. 2021 à 22:10
22 déc. 2021 à 22:10
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Valeurtexte = Selection.Text
If Valeurtexte <> "" Then
Nouveautexte = Left(Valeurtexte, Len(Valeurtexte) - 2) & ":" & Right(Valeurtexte, 2)
Selection.Value = Nouveautexte
End If
End Sub
Valeurtexte = Selection.Text
If Valeurtexte <> "" Then
Nouveautexte = Left(Valeurtexte, Len(Valeurtexte) - 2) & ":" & Right(Valeurtexte, 2)
Selection.Value = Nouveautexte
End If
End Sub