Comment ajouter du texte à la dernière ligne d'une colonne

Il vous plaît j'ai besoin d'un peu d'aide avec la façon d'ajouter du texte à la dernière (vide) ligne dans une colonne à l'aide de VBA?

J'ai un spreedsheet avec un Contrôle ActiveX bouton sur elle. Je veux qu'en cliquant sur le bouton de commande, Excel prend le texte figurant dans le dire, la cellule C3, et l'ajouter à la dernière (vide) de ligne de la colonne A.

Veuillez noter que la Colonne A contient déjà du texte dans des cellules différentes. Ce que je veux faire est de trouver la dernière cellule vide, puis transférer le texte de la cellule C3 pour cette dernière ligne vide. Merci.

InformationsquelleAutor Iki | 2015-05-18
  1. 1

    Affecter cette macro à votre bouton:

    Sub ButtonCode()
   Dim N As Long
   N = Cells(Rows.Count, "A").End(xlUp).Row + 1
   Cells(N, "A").Value = Range("C3").Value
End Sub

    Trouver la première cellule vide ci-dessous toutes les données dans la colonne Un et de la place de la C3 valeur.

    InformationsquelleAutor Gary's Student
  2. 0

    Essayez le code suivant:

    Sub MoveFromCToA()
    Cells(rows.count,1).end(xlup).offset(1).value = cells(3,3)
End Sub
    InformationsquelleAutor user3561813