Coucou,
par VBA, je veux ajouter dans une cellule la date du jour mais que celle
ci soit écrite en dur, en texte (surtout pas sous forme d'une date
excel) et sous la forme 2003-29-11.
Cells(NewEnreg, 6).Formula = "=text(now(), ""aaaa-mm-jj"")"
me donne ce que je veux, sauf qu'évidemment ça se met à jour à chaque
ouverture du classeur ce que je ne veux pas.
A part faire un copier/ coller spécial valeur sur cette cellule après
l'avoir remplie...
merci
--
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
Dans le mêmegenre comment faire pour taper 12-3 dans une cellule sans qu'excel pense immédiatement que je lui donne une date ? et me transforme ma saisie ? A part mettre '12-3...
Formatter en texte AVANT d'effectuer la saisie.
Salutations,
Daniel M.
Bonjour Misange,
Dans le mêmegenre comment faire pour taper 12-3 dans une cellule sans
qu'excel pense immédiatement que je lui donne une date ? et me
transforme ma saisie ? A part mettre '12-3...
Dans le mêmegenre comment faire pour taper 12-3 dans une cellule sans qu'excel pense immédiatement que je lui donne une date ? et me transforme ma saisie ? A part mettre '12-3...
Formatter en texte AVANT d'effectuer la saisie.
Salutations,
Daniel M.
Misange
Daniel.M wrote:
Formatter en texte AVANT d'effectuer la saisie.
oui bien sur ça quand même je connais mais le pb c'est que souvent je copie colle des données qu'on m'envoie dans word et je ne vois pas toujours qu'il y a des machins de ce genre. Il y a souvent un mélange de nombres à garder tels que ou de trucs du genre 12-3 que je voudrais pas transformer en date. Une fois collé ce qui est exaspérant c'est qu'on perd la donnée originale si on n'a pas formaté avant. Si seulement il y a vait une case à cocher dans les options prévoyant de NE PAS systématiquement interpréter les données comme des dates... A croire que les microsoftiens n'imaginent pas qu'un classeur puisse ne pas comporter de dates ;-( Donc tu me confirmes, hors du préformatage point de salut ?
--
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Daniel.M wrote:
Formatter en texte AVANT d'effectuer la saisie.
oui bien sur ça quand même je connais mais le pb c'est que souvent je
copie colle des données qu'on m'envoie dans word et je ne vois pas
toujours qu'il y a des machins de ce genre. Il y a souvent un mélange de
nombres à garder tels que ou de trucs du genre 12-3 que je voudrais pas
transformer en date. Une fois collé ce qui est exaspérant c'est qu'on
perd la donnée originale si on n'a pas formaté avant. Si seulement il y
a vait une case à cocher dans les options prévoyant de NE PAS
systématiquement interpréter les données comme des dates... A croire que
les microsoftiens n'imaginent pas qu'un classeur puisse ne pas comporter
de dates ;-(
Donc tu me confirmes, hors du préformatage point de salut ?
--
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
oui bien sur ça quand même je connais mais le pb c'est que souvent je copie colle des données qu'on m'envoie dans word et je ne vois pas toujours qu'il y a des machins de ce genre. Il y a souvent un mélange de nombres à garder tels que ou de trucs du genre 12-3 que je voudrais pas transformer en date. Une fois collé ce qui est exaspérant c'est qu'on perd la donnée originale si on n'a pas formaté avant. Si seulement il y a vait une case à cocher dans les options prévoyant de NE PAS systématiquement interpréter les données comme des dates... A croire que les microsoftiens n'imaginent pas qu'un classeur puisse ne pas comporter de dates ;-( Donc tu me confirmes, hors du préformatage point de salut ?
--
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Frédéric Sigonneau
Bonjour Flo,
Pas de salut, non :( Cependant, si c'est un comportement par défaut que tu souhaites, tu peux utiliser ce petit contournement pour le classeur concerné :
'=========module ThisWorkbook Private Sub Workbook_SheetActivate(ByVal Sh As Object) ActiveCell.NumberFormat = "@" End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Target.NumberFormat = "@" End Sub '=========================== FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
Daniel.M wrote:
Formatter en texte AVANT d'effectuer la saisie.
oui bien sur ça quand même je connais mais le pb c'est que souvent je copie colle des données qu'on m'envoie dans word et je ne vois pas toujours qu'il y a des machins de ce genre. Il y a souvent un mélange de nombres à garder tels que ou de trucs du genre 12-3 que je voudrais pas transformer en date. Une fois collé ce qui est exaspérant c'est qu'on perd la donnée originale si on n'a pas formaté avant. Si seulement il y a vait une case à cocher dans les options prévoyant de NE PAS systématiquement interpréter les données comme des dates... A croire que les microsoftiens n'imaginent pas qu'un classeur puisse ne pas comporter de dates ;-( Donc tu me confirmes, hors du préformatage point de salut ?
--
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Bonjour Flo,
Pas de salut, non :(
Cependant, si c'est un comportement par défaut que tu souhaites, tu peux
utiliser ce petit contournement pour le classeur concerné :
'=========module ThisWorkbook
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
ActiveCell.NumberFormat = "@"
End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As
Range)
Target.NumberFormat = "@"
End Sub
'===========================
FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !
Daniel.M wrote:
Formatter en texte AVANT d'effectuer la saisie.
oui bien sur ça quand même je connais mais le pb c'est que souvent je
copie colle des données qu'on m'envoie dans word et je ne vois pas
toujours qu'il y a des machins de ce genre. Il y a souvent un mélange de
nombres à garder tels que ou de trucs du genre 12-3 que je voudrais pas
transformer en date. Une fois collé ce qui est exaspérant c'est qu'on
perd la donnée originale si on n'a pas formaté avant. Si seulement il y
a vait une case à cocher dans les options prévoyant de NE PAS
systématiquement interpréter les données comme des dates... A croire que
les microsoftiens n'imaginent pas qu'un classeur puisse ne pas comporter
de dates ;-(
Donc tu me confirmes, hors du préformatage point de salut ?
--
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
Pas de salut, non :( Cependant, si c'est un comportement par défaut que tu souhaites, tu peux utiliser ce petit contournement pour le classeur concerné :
'=========module ThisWorkbook Private Sub Workbook_SheetActivate(ByVal Sh As Object) ActiveCell.NumberFormat = "@" End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Target.NumberFormat = "@" End Sub '=========================== FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
Daniel.M wrote:
Formatter en texte AVANT d'effectuer la saisie.
oui bien sur ça quand même je connais mais le pb c'est que souvent je copie colle des données qu'on m'envoie dans word et je ne vois pas toujours qu'il y a des machins de ce genre. Il y a souvent un mélange de nombres à garder tels que ou de trucs du genre 12-3 que je voudrais pas transformer en date. Une fois collé ce qui est exaspérant c'est qu'on perd la donnée originale si on n'a pas formaté avant. Si seulement il y a vait une case à cocher dans les options prévoyant de NE PAS systématiquement interpréter les données comme des dates... A croire que les microsoftiens n'imaginent pas qu'un classeur puisse ne pas comporter de dates ;-( Donc tu me confirmes, hors du préformatage point de salut ?
--
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Misange
Bonsoir Frédéric (la nuit tombe déjà !) c'est effectivement une solution à garder pour ce type de données à importer. Merci
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Frédéric Sigonneau wrote:
Bonjour Flo,
Pas de salut, non :( Cependant, si c'est un comportement par défaut que tu souhaites, tu peux utiliser ce petit contournement pour le classeur concerné :
'=========module ThisWorkbook Private Sub Workbook_SheetActivate(ByVal Sh As Object) ActiveCell.NumberFormat = "@" End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Target.NumberFormat = "@" End Sub '=========================== > FS
Bonsoir Frédéric (la nuit tombe déjà !)
c'est effectivement une solution à garder pour ce type de données à
importer.
Merci
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta
Frédéric Sigonneau wrote:
Bonjour Flo,
Pas de salut, non :(
Cependant, si c'est un comportement par défaut que tu souhaites, tu peux
utiliser ce petit contournement pour le classeur concerné :
'=========module ThisWorkbook
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
ActiveCell.NumberFormat = "@"
End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As
Range)
Target.NumberFormat = "@"
End Sub
'=========================== >
FS
Bonsoir Frédéric (la nuit tombe déjà !) c'est effectivement une solution à garder pour ce type de données à importer. Merci
Misange migrateuse http://www.excelabo.net mail : http://cerbermail.com/?k5Q8Dh2mta
Frédéric Sigonneau wrote:
Bonjour Flo,
Pas de salut, non :( Cependant, si c'est un comportement par défaut que tu souhaites, tu peux utiliser ce petit contournement pour le classeur concerné :
'=========module ThisWorkbook Private Sub Workbook_SheetActivate(ByVal Sh As Object) ActiveCell.NumberFormat = "@" End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Target.NumberFormat = "@" End Sub '=========================== > FS
