Ajout de texte à une cellule dans Excel à l'aide de VBA

Question

Je travaille avec des macros SQL et Excel, mais je ne sais pas comment ajouter du texte à une cellule.

Je souhaite ajouter le texte "01/01/13 00:00" à la cellule A1. Je ne peux pas simplement l'écrire dans la cellule car la macro efface d'abord le contenu de la feuille puis ajoute les informations.

Comment est-ce que je fais cela dans VBA?

Bathsheba · Accepted Answer

Range("$A$1").Value = "'01/01/13 00:00" le fera.

Notez la citation simple; cela annulera la conversion automatique en un type de numéro. Mais est-ce ce que vous vraiment voulez-vous? Une alternative serait de formater la cellule pour prendre une valeur date-heure. Ensuite, supprimez la citation simple de la chaîne.

Floris · Answer

Vous pourriez faire

[A1].Value = "'O1/01/13 00:00"

si vous voulez vraiment l'ajouter en tant que texte (notez l'apostrophe comme premier caractère).

Le [A1].Value est un raccourci VBA pour Range("A1").Value.

Si vous voulez entrer une date, vous pouvez plutôt faire (ordre modifié avec grâce à @SiddharthRout):

[A1].NumberFormat = "mm/dd/yyyy hh:mm;@" [A1].Value = DateValue("01/01/2013 00:00")

Garry · Answer

Vous devez utiliser les fonctions Range et Value.
Range serait la cellule où vous voulez le texte que vous voulez
Value serait le texte que vous voulez dans cette cellule

Range("A1").Value="whatever text"

Neha Kalani · Answer

Vous pouvez également utiliser la propriété de cellule.

Cells(1, 1).Value = "Hey, what's up?"

Assurez-vous d'utiliser un . avant Cells(1,1).Value comme dans .Cells(1,1).Value, si vous l'utilisez dans la fonction With. Si vous sélectionnez une feuille.