Discussion :

[toto92]

Bonjour

Je suis sous Win7 et Excel 2010

Comment mettre du texte sur plusieurs lignes d'un onglet ?
je voudrais mettre :
"Toto" sur 1ere ligne / 1ere colonne
"Titi" sur 2ele ligne/ 1ere colonne
"Tata" sur 3°ligne / 1ere colonne
etc...

ci dessous : debut de mon macro qui ne m'a pas donné satisfaction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Windows("KPIs.xlsx").Activate
    NomOnglet = "KPI07 NEW"
    Worksheets(NomOnglet).Select
    Range("A1").Select
    'ActiveCell.FormulaR1C1 = "Toto" _
     & "Titi" _
     & "

[ganjakass]

Je sais pas si c'est ça que tu veux mais pour un userForm c'est:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
'bouton pour réaliser une impression (& vbCrLf & => permet de refaire un saut à la ligne)
Private Sub imprimer_Click()
impr = MsgBox("Voulez-vous imprimer ?" & vbCrLf & "l'impression aura lieu sur votre imprimante par défaut", vbYesNo)
If impr = vbNo Then
    Exit Sub
Else
    ActiveWindow.SelectedSheets.PrintOut
End If
 
End Sub

[toto92]

Bonsoir ganjakass

Je cherche à preparer plusieurs textes dans mon code VBA et les coller sur la feuille sur plusieurs lignes
Je voudrais obtenir le meme resultat ( voir fichier joint... )

[ganjakass]

jamais fait désolé.

[78chris]

Bonjour

Une solution parmi d'autre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Windows("KPIs.xlsx").Activate
    NomOnglet = "KPI07 NEW"
    With Worksheets(NomOnglet).Range("A1")
           .offset(0,0).value="Toto" 
           .offset(1,0).value="Titi"
           .offset(2,0).value="Tata"
    end with

[toto92]

oui ca marche !
MercIIIIIIIIIIIIIIIIIIIIIII !