Macro
Scalpa31_1966
-
franc38 Messages postés 197 Date d'inscription Statut Membre Dernière intervention -
franc38 Messages postés 197 Date d'inscription Statut Membre Dernière intervention -
Dans un fichier EXCEL-2013, il y a un tableau avec beaucoup de lignes.
J’écris une Macro dans laquelle :
1)- Il y a une variable « Finligne ».
2)- Dans laquelle se stocke le nombre de ligne.
3)- ???.Value=Finline.value- Quel code faut-il écrire pour que s’inscrive, dans une cellule ou une box, le nombre de lignes trouvé ?
Remerciements
J’écris une Macro dans laquelle :
1)- Il y a une variable « Finligne ».
2)- Dans laquelle se stocke le nombre de ligne.
3)- ???.Value=Finline.value- Quel code faut-il écrire pour que s’inscrive, dans une cellule ou une box, le nombre de lignes trouvé ?
Remerciements
Sub Macro
Sheets("FINALIST").Select
Dim Finligne, Numeroligne As Integer
Finligne = ActiveSheet.UsedRange.Rows.Count
????.value=Finligne.value
Numeroligne=2
End Sub
4 réponses
-
Bonjour
range("A1").value=Finligne 'pour mettre la réponse en A1
msgbox(Finligne) 'message
me.textbox1.value=Finligne
A+ François -
Merci beaucoup pour votre rapide réponse.
Cependant,
Si après la commande :
Range("A1").value=Finligne 'pour mettre la réponse en A1
Je veux faire afficher sur l’écran dans la cellule A2 ou une autre ou une textbox, le contenu de A1
Quel ordre dois-je donner ?
?????? = Range (‘’A1’’).Value
Car je trouve que la procédure via le MsgBox est trop lourde, je veux juste lire l’information sans interroger.
Remerciements -
Merci beaucoup pour votre rapide réponse.
Cependant,
Si après la commande :
Range("A1").value=Finligne 'pour mettre la réponse en A1
Je veux faire afficher sur l’écran dans la cellule A2 ou une autre ou une textbox, le contenu de A1
Quel ordre dois-je donner ?
?????? = Range (‘’A1’’).Value
Car je trouve que la procédure via le MsgBox est trop lourde, je veux juste lire l’information sans interroger.
Remerciements -
Bonjour
la réponse est dans le 1er post
range("A2").value=Finligne 'pour mettre la réponse en A2
me.textbox1.value=Finligne 'pour mettre la réponse dans un textbox
il existe des cours gratuit sur le net. Par exemple:
https://forum.excel-pratique.com/excel/
A+ François
