-1
votes

Convertissez toutes les lignes dans une colonne avec le format de date au format texte

J'ai besoin de convertir la colonne avec des dates, format de jour formatés en format texte et si possible en sens inverse. Je peux appliquer une fonction de la feuille de calcul forte> texte, remplissez par Copier coller ou double-cliquer, puis copiez / coupez la colonne d'assistance et collez comme valeur dans la colonne d'origine et enregistrez la macro, mais y a-t-il un moyen de faire Donc, sans sélectionner / activation, Autofilling, à l'aide de colonnes d'assistance, (comme "H" et "i") dans cet exemple? Une fonction VBA sera-t-elle à la place de la fonction de feuille de calcul entraîner une plus grande efficacité? P>

Sub DateFormatToText()
    Range("H2").Select
    ActiveCell.FormulaR1C1 = "=TEXT(RC[-1],""dd/mm/yyyy"")"
    Range("H2").Select
    Selection.AutoFill Destination:=Range("H2:H20")
End Sub

excel vba date text autofill

1 commentaires

Vous avez marqué la question comme VBA, alors s'il vous plaît, postez le code que vous avez essayé.Veuillez voir Comment créer un minimum, complet et vérifiable Exemple . En outre, vous avez dit Les formats de date au format texte et si possible dans l'inverse , votre formule doit donc être = texte (A1; "AAAA / MM / DD")

3 Réponses : 0 votes =TEXT(G2,"dd-mm-yyyy") used - operation either using Replace function 0 commentaires 2 votes Vous pouvez essayer comme ci-dessous: Range("H2:H" & Range("G" & Rows.Count).End(xlUp).Row).Formula = "=TEXT(G2,""dd/mm/yyyy"")" 5 commentaires Monsieur, merci beaucoup. Est-il possible sans utiliser des colonnes d'assistance, (comme "H" et "I") dans cet exemple et en utilisant une fonction VBA à la place de la fonction de feuille de calcul? @Biswajit, je ne suis pas sûr de comprendre votre condition. Il ne sera pas possible d'avoir des deux résultats dans une colonne (colonne H et colonne I). Quel est exactement l'objectif? @ Shrivallabha.redij je pense que op signifie changer la valeur de la colonne G directement dans le texte. Probablement une boucle dans chaque cellule le ferait. Quoi qu'il en soit, avancé votre réponse. Monsieur, le code affiche Erreur d'exécution 1004 (erreur définie par l'application ou d'objet). J'ai essayé de le changer à ActiveHeet.Range ("H2: H" & gamme ("g" & rows.count) .end (xlup) .row) .formula = application.worksheetfunction.text (G2, "DD / mm / aaaa ") Mais alors cela montre le résultat du 00/01/1900 pour chaque ligne. De plus, est-il possible de convertir la colonne G en format texte directement sans changer d'abord dans la colonne H. Votre réponse résolue mon problème, mais je veux juste savoir s'il est possible du tout.Je n'ai pas besoin de modification de la valeur dans une autre colonne. @Biswajit, mon mauvais il y avait une faute de frappe dans le code. Je l'ai réparé maintenant. Pour: Foxfire et brûlures brûlures: comprises. Mais puisqu'il mentionnait des sorties des deux colonnes, je suis confus. 1 votes sans colonnes sans aide, aucune feuille de calcul Pour modifier les entrées de date dans la même colonne, quelque chose comme: xxx 0 commentaires

Articles qui pourrait vous intéresser : Comment amener quatre colonnes de données Excel en deux lignes dans Pandas AttributeError: l'objet 'ElementTree' n'a pas d'attribut 'getiterator' lors de la tentative d'importation d'un fichier Excel La fenêtre de l'application EXCEL ne se ferme pas sur classeur.close () Exécuter la macro lorsque le résultat de la cellule change par formule