A l'initialisation d'un Userform, je souhaite que le Textbox13 inscrive le
nombre total de fois que l'on retrouve le nombre apparaissant dans la cellule
active dans la colonne G.
Par exemple, si le nombre de la cellule active est 3271, alors je veux que
le Textbox13 indique le nombre de fois que le nombre 3271 apparait lans la
colonne G.
Voici où j'en suis:
Dim Rg As Range
Set Rg = .Range("G3:G" & .Range("G65536").End(xlUp).Row)
Me.TextBox13 = Application.CountIf(Rg, Rg(Rg.Rows.Count))
Malheureusement, le nombre apparaissant dans le Textbox13 est celui du
nombre qui apparait le plus souvent dans la colonne. Je crois bien que je
doive indiquer quelque part ActiveCell, mais je ne sais pas où...
pourriez-vous m'aider?
A l'initialisation d'un Userform, je souhaite que le Textbox13 inscrive le nombre total de fois que l'on retrouve le nombre apparaissant dans la cellule active dans la colonne G.
Par exemple, si le nombre de la cellule active est 3271, alors je veux que le Textbox13 indique le nombre de fois que le nombre 3271 apparait lans la colonne G.
Voici où j'en suis:
Dim Rg As Range Set Rg = .Range("G3:G" & .Range("G65536").End(xlUp).Row) Me.TextBox13 = Application.CountIf(Rg, Rg(Rg.Rows.Count))
Malheureusement, le nombre apparaissant dans le Textbox13 est celui du nombre qui apparait le plus souvent dans la colonne. Je crois bien que je doive indiquer quelque part ActiveCell, mais je ne sais pas où... pourriez-vous m'aider?
"Denys" <Denys@discussions.microsoft.com> a écrit dans le message de news:
08433A0E-59D2-42AC-8044-3FBC9320E048@microsoft.com...
Bonjour à tous,
A l'initialisation d'un Userform, je souhaite que le Textbox13 inscrive le
nombre total de fois que l'on retrouve le nombre apparaissant dans la
cellule
active dans la colonne G.
Par exemple, si le nombre de la cellule active est 3271, alors je veux que
le Textbox13 indique le nombre de fois que le nombre 3271 apparait lans la
colonne G.
Voici où j'en suis:
Dim Rg As Range
Set Rg = .Range("G3:G" & .Range("G65536").End(xlUp).Row)
Me.TextBox13 = Application.CountIf(Rg, Rg(Rg.Rows.Count))
Malheureusement, le nombre apparaissant dans le Textbox13 est celui du
nombre qui apparait le plus souvent dans la colonne. Je crois bien que je
doive indiquer quelque part ActiveCell, mais je ne sais pas où...
pourriez-vous m'aider?
A l'initialisation d'un Userform, je souhaite que le Textbox13 inscrive le nombre total de fois que l'on retrouve le nombre apparaissant dans la cellule active dans la colonne G.
Par exemple, si le nombre de la cellule active est 3271, alors je veux que le Textbox13 indique le nombre de fois que le nombre 3271 apparait lans la colonne G.
Voici où j'en suis:
Dim Rg As Range Set Rg = .Range("G3:G" & .Range("G65536").End(xlUp).Row) Me.TextBox13 = Application.CountIf(Rg, Rg(Rg.Rows.Count))
Malheureusement, le nombre apparaissant dans le Textbox13 est celui du nombre qui apparait le plus souvent dans la colonne. Je crois bien que je doive indiquer quelque part ActiveCell, mais je ne sais pas où... pourriez-vous m'aider?
A l'initialisation d'un Userform, je souhaite que le Textbox13 inscrive le nombre total de fois que l'on retrouve le nombre apparaissant dans la cellule active dans la colonne G.
Par exemple, si le nombre de la cellule active est 3271, alors je veux que le Textbox13 indique le nombre de fois que le nombre 3271 apparait lans la colonne G.
Voici où j'en suis:
Dim Rg As Range Set Rg = .Range("G3:G" & .Range("G65536").End(xlUp).Row) Me.TextBox13 = Application.CountIf(Rg, Rg(Rg.Rows.Count))
Malheureusement, le nombre apparaissant dans le Textbox13 est celui du nombre qui apparait le plus souvent dans la colonne. Je crois bien que je doive indiquer quelque part ActiveCell, mais je ne sais pas où... pourriez-vous m'aider?
"Denys" <Denys@discussions.microsoft.com> a écrit dans le message de news:
08433A0E-59D2-42AC-8044-3FBC9320E048@microsoft.com...
Bonjour à tous,
A l'initialisation d'un Userform, je souhaite que le Textbox13 inscrive le
nombre total de fois que l'on retrouve le nombre apparaissant dans la
cellule
active dans la colonne G.
Par exemple, si le nombre de la cellule active est 3271, alors je veux que
le Textbox13 indique le nombre de fois que le nombre 3271 apparait lans la
colonne G.
Voici où j'en suis:
Dim Rg As Range
Set Rg = .Range("G3:G" & .Range("G65536").End(xlUp).Row)
Me.TextBox13 = Application.CountIf(Rg, Rg(Rg.Rows.Count))
Malheureusement, le nombre apparaissant dans le Textbox13 est celui du
nombre qui apparait le plus souvent dans la colonne. Je crois bien que je
doive indiquer quelque part ActiveCell, mais je ne sais pas où...
pourriez-vous m'aider?
A l'initialisation d'un Userform, je souhaite que le Textbox13 inscrive le nombre total de fois que l'on retrouve le nombre apparaissant dans la cellule active dans la colonne G.
Par exemple, si le nombre de la cellule active est 3271, alors je veux que le Textbox13 indique le nombre de fois que le nombre 3271 apparait lans la colonne G.
Voici où j'en suis:
Dim Rg As Range Set Rg = .Range("G3:G" & .Range("G65536").End(xlUp).Row) Me.TextBox13 = Application.CountIf(Rg, Rg(Rg.Rows.Count))
Malheureusement, le nombre apparaissant dans le Textbox13 est celui du nombre qui apparait le plus souvent dans la colonne. Je crois bien que je doive indiquer quelque part ActiveCell, mais je ne sais pas où... pourriez-vous m'aider?
Mertci pour votre temps....
Denys
Lolote
Salut Denys, Peut être ceci .....
Sub Test() For Each xValeur In Range("U3:U" & Range("U65536").End(xlUp).Row) If xValeur = ActiveCell.Value Then xCpt = xCpt + 1 End If Next Me.TextBox13 = xCpt End Sub
@+ Lolote
"Denys" a écrit dans le message de news:
Bonjour à tous,
A l'initialisation d'un Userform, je souhaite que le Textbox13 inscrive le nombre total de fois que l'on retrouve le nombre apparaissant dans la cellule active dans la colonne G.
Par exemple, si le nombre de la cellule active est 3271, alors je veux que le Textbox13 indique le nombre de fois que le nombre 3271 apparait lans la colonne G.
Voici où j'en suis:
Dim Rg As Range Set Rg = .Range("G3:G" & .Range("G65536").End(xlUp).Row) Me.TextBox13 = Application.CountIf(Rg, Rg(Rg.Rows.Count))
Malheureusement, le nombre apparaissant dans le Textbox13 est celui du nombre qui apparait le plus souvent dans la colonne. Je crois bien que je doive indiquer quelque part ActiveCell, mais je ne sais pas où... pourriez-vous m'aider?
Mertci pour votre temps....
Denys
Salut Denys,
Peut être ceci .....
Sub Test()
For Each xValeur In Range("U3:U" & Range("U65536").End(xlUp).Row)
If xValeur = ActiveCell.Value Then
xCpt = xCpt + 1
End If
Next
Me.TextBox13 = xCpt
End Sub
@+ Lolote
"Denys" <Denys@discussions.microsoft.com> a écrit dans le message de news:
08433A0E-59D2-42AC-8044-3FBC9320E048@microsoft.com...
Bonjour à tous,
A l'initialisation d'un Userform, je souhaite que le Textbox13 inscrive le
nombre total de fois que l'on retrouve le nombre apparaissant dans la
cellule
active dans la colonne G.
Par exemple, si le nombre de la cellule active est 3271, alors je veux que
le Textbox13 indique le nombre de fois que le nombre 3271 apparait lans la
colonne G.
Voici où j'en suis:
Dim Rg As Range
Set Rg = .Range("G3:G" & .Range("G65536").End(xlUp).Row)
Me.TextBox13 = Application.CountIf(Rg, Rg(Rg.Rows.Count))
Malheureusement, le nombre apparaissant dans le Textbox13 est celui du
nombre qui apparait le plus souvent dans la colonne. Je crois bien que je
doive indiquer quelque part ActiveCell, mais je ne sais pas où...
pourriez-vous m'aider?
Sub Test() For Each xValeur In Range("U3:U" & Range("U65536").End(xlUp).Row) If xValeur = ActiveCell.Value Then xCpt = xCpt + 1 End If Next Me.TextBox13 = xCpt End Sub
@+ Lolote
"Denys" a écrit dans le message de news:
Bonjour à tous,
A l'initialisation d'un Userform, je souhaite que le Textbox13 inscrive le nombre total de fois que l'on retrouve le nombre apparaissant dans la cellule active dans la colonne G.
Par exemple, si le nombre de la cellule active est 3271, alors je veux que le Textbox13 indique le nombre de fois que le nombre 3271 apparait lans la colonne G.
Voici où j'en suis:
Dim Rg As Range Set Rg = .Range("G3:G" & .Range("G65536").End(xlUp).Row) Me.TextBox13 = Application.CountIf(Rg, Rg(Rg.Rows.Count))
Malheureusement, le nombre apparaissant dans le Textbox13 est celui du nombre qui apparait le plus souvent dans la colonne. Je crois bien que je doive indiquer quelque part ActiveCell, mais je ne sais pas où... pourriez-vous m'aider?
