VBA nombre de lignes utilisées

chris

XLDnaute Barbatruc

• 12 Octobre 2018

• #2

Bonjour à tous

Multipost, avec déjà des réponses ailleurs...

 

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 12 Octobre 2018

• #3

Bonsour®

lynyrd à dit:

Bonjour le forum
Je souhaiterais afficher dans la textbox1 le nombre de lignes utilisées.
Merci.

Cliquez pour agrandir...

voir l'instruction :
ActiveSheet.UsedRange.Rows
attention utilisées ou ayant été utilisées...
ce qui est différent de lignes non vides

 

Vote positif 0 Vote négatif

lynyrd

XLDnaute Impliqué

• 12 Octobre 2018

• #4

Merci Modeste geedee.
Je ne comprend pas,c'est peut etre parce que j'utilise une combobox?
la textbox11 est tous en haut a droite.
Merci

 

Pièces jointes

• VIDEOTHEQUE.xlsm

  39.2 KB · Affichages: 23

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 13 Octobre 2018

• #5

lynyrd à dit:

Merci Modeste geedee.
Je ne comprend pas,c'est peut etre parce que j'utilise une combobox?
la textbox11 est tous en haut a droite.
Merci

Cliquez pour agrandir...

VB:

Private Sub obG1()
    UserForm1.Frame2.Visible = UserForm1.OptionButton2.Value
    If Me.OptionButton1.Value = True Then
        For x = 1 To 11
            Me.Controls("TextBox" & x).Value = ""
        Next x
        Me.TextBox1.SetFocus
        nl = 0
    End If
    'TextBox11.Value = ActiveSheet.UsedRange.Rows.Count
'ou bien 
    'TextBox11.Value = Application.CountA(Range("A:A"))
End Sub

 

Vote positif 0 Vote négatif

lynyrd

XLDnaute Impliqué

• 13 Octobre 2018

• #6

Merci Modeste geedee,ca fonctionne nickel.
A+

 

Vote positif 0 Vote négatif