Pour trouver la ligne de la dernière cellule remplie dans la plage A:B,
je n'ai rien trouvé de mieux que ( ne risez pas ! ) :
DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row)
Sauriez-vous me proposer quelque chose de plus simple ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
RGI
Bonjour
ça peut-être
Sub derlAB() On Error Resume Next derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row MsgBox derL End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B, je n'ai rien trouvé de mieux que ( ne risez pas ! ) : DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row) Sauriez-vous me proposer quelque chose de plus simple ?
Serge
Bonjour
ça peut-être
Sub derlAB()
On Error Resume Next
derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row
MsgBox derL
End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B,
je n'ai rien trouvé de mieux que ( ne risez pas ! ) :
DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row)
Sauriez-vous me proposer quelque chose de plus simple ?
Sub derlAB() On Error Resume Next derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row MsgBox derL End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B, je n'ai rien trouvé de mieux que ( ne risez pas ! ) : DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row) Sauriez-vous me proposer quelque chose de plus simple ?
Serge
garnote
Merci RGI.
SG
"RGI" a écrit dans le message de news: e%23R$
Bonjour
ça peut-être
Sub derlAB() On Error Resume Next derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row MsgBox derL End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B, je n'ai rien trouvé de mieux que ( ne risez pas ! ) : DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row) Sauriez-vous me proposer quelque chose de plus simple ?
Serge
Merci RGI.
SG
"RGI" <nospam.gilbert@discussions.microsoft.com> a écrit dans le message de news: e%23R$PrjZHHA.4772@TK2MSFTNGP05.phx.gbl...
Bonjour
ça peut-être
Sub derlAB()
On Error Resume Next
derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row
MsgBox derL
End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B,
je n'ai rien trouvé de mieux que ( ne risez pas ! ) :
DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row)
Sauriez-vous me proposer quelque chose de plus simple ?
Sub derlAB() On Error Resume Next derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row MsgBox derL End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B, je n'ai rien trouvé de mieux que ( ne risez pas ! ) : DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row) Sauriez-vous me proposer quelque chose de plus simple ?
retourne la dernière ligne occupé par une donnée ou une formule dans la colonne a:b
Si tu veux obtenir la dernière ligne occupée par une donnée (nonobstant les formules) tu devras dans la ligne de code utilisé : derL = [A:B].Find("*", , xlValues, , xlByRows, xlPrevious).Row
Exemple : Si la dernière ligne retourne "" d'une formule : =si(G5=1;"";2)
Le paramètre xLFormulas tiendras compte de cette ligne tandis que le paramètre XlValues n'en tiendra pas compte et retournera la dernière cellule affichant une donnée.
"garnote" a écrit dans le message de news:
Merci RGI.
SG
"RGI" a écrit dans le message de news: e%23R$
Bonjour
ça peut-être
Sub derlAB() On Error Resume Next derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row MsgBox derL End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B, je n'ai rien trouvé de mieux que ( ne risez pas ! ) : DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row) Sauriez-vous me proposer quelque chose de plus simple ?
retourne la dernière ligne occupé par une donnée ou une formule dans la colonne a:b
Si tu veux obtenir la dernière ligne occupée par une donnée (nonobstant les formules)
tu devras dans la ligne de code utilisé :
derL = [A:B].Find("*", , xlValues, , xlByRows, xlPrevious).Row
Exemple : Si la dernière ligne retourne "" d'une formule :
=si(G5=1;"";2)
Le paramètre xLFormulas tiendras compte de cette ligne tandis
que le paramètre XlValues n'en tiendra pas compte et retournera
la dernière cellule affichant une donnée.
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
uNJfCAkZHHA.4808@TK2MSFTNGP04.phx.gbl...
Merci RGI.
SG
"RGI" <nospam.gilbert@discussions.microsoft.com> a écrit dans le message de news:
e%23R$PrjZHHA.4772@TK2MSFTNGP05.phx.gbl...
Bonjour
ça peut-être
Sub derlAB()
On Error Resume Next
derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row
MsgBox derL
End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B,
je n'ai rien trouvé de mieux que ( ne risez pas ! ) :
DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row)
Sauriez-vous me proposer quelque chose de plus simple ?
retourne la dernière ligne occupé par une donnée ou une formule dans la colonne a:b
Si tu veux obtenir la dernière ligne occupée par une donnée (nonobstant les formules) tu devras dans la ligne de code utilisé : derL = [A:B].Find("*", , xlValues, , xlByRows, xlPrevious).Row
Exemple : Si la dernière ligne retourne "" d'une formule : =si(G5=1;"";2)
Le paramètre xLFormulas tiendras compte de cette ligne tandis que le paramètre XlValues n'en tiendra pas compte et retournera la dernière cellule affichant une donnée.
"garnote" a écrit dans le message de news:
Merci RGI.
SG
"RGI" a écrit dans le message de news: e%23R$
Bonjour
ça peut-être
Sub derlAB() On Error Resume Next derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row MsgBox derL End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B, je n'ai rien trouvé de mieux que ( ne risez pas ! ) : DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row) Sauriez-vous me proposer quelque chose de plus simple ?
retourne la dernière ligne occupé par une donnée ou une formule dans la colonne a:b
Si tu veux obtenir la dernière ligne occupée par une donnée (nonobstant les formules) tu devras dans la ligne de code utilisé : derL = [A:B].Find("*", , xlValues, , xlByRows, xlPrevious).Row
Exemple : Si la dernière ligne retourne "" d'une formule : =si(G5=1;"";2)
Le paramètre xLFormulas tiendras compte de cette ligne tandis que le paramètre XlValues n'en tiendra pas compte et retournera la dernière cellule affichant une donnée.
"garnote" a écrit dans le message de news:
Merci RGI.
SG
"RGI" a écrit dans le message de news: e%23R$
Bonjour
ça peut-être
Sub derlAB() On Error Resume Next derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row MsgBox derL End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B, je n'ai rien trouvé de mieux que ( ne risez pas ! ) : DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row) Sauriez-vous me proposer quelque chose de plus simple ?
retourne la dernière ligne occupé par une donnée ou une formule dans la colonne a:b
Si tu veux obtenir la dernière ligne occupée par une donnée (nonobstant les formules)
tu devras dans la ligne de code utilisé :
derL = [A:B].Find("*", , xlValues, , xlByRows, xlPrevious).Row
Exemple : Si la dernière ligne retourne "" d'une formule :
=si(G5=1;"";2)
Le paramètre xLFormulas tiendras compte de cette ligne tandis
que le paramètre XlValues n'en tiendra pas compte et retournera
la dernière cellule affichant une donnée.
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
uNJfCAkZHHA.4808@TK2MSFTNGP04.phx.gbl...
Merci RGI.
SG
"RGI" <nospam.gilbert@discussions.microsoft.com> a écrit dans le message de news:
e%23R$PrjZHHA.4772@TK2MSFTNGP05.phx.gbl...
Bonjour
ça peut-être
Sub derlAB()
On Error Resume Next
derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row
MsgBox derL
End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B,
je n'ai rien trouvé de mieux que ( ne risez pas ! ) :
DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row)
Sauriez-vous me proposer quelque chose de plus simple ?
retourne la dernière ligne occupé par une donnée ou une formule dans la colonne a:b
Si tu veux obtenir la dernière ligne occupée par une donnée (nonobstant les formules) tu devras dans la ligne de code utilisé : derL = [A:B].Find("*", , xlValues, , xlByRows, xlPrevious).Row
Exemple : Si la dernière ligne retourne "" d'une formule : =si(G5=1;"";2)
Le paramètre xLFormulas tiendras compte de cette ligne tandis que le paramètre XlValues n'en tiendra pas compte et retournera la dernière cellule affichant une donnée.
"garnote" a écrit dans le message de news:
Merci RGI.
SG
"RGI" a écrit dans le message de news: e%23R$
Bonjour
ça peut-être
Sub derlAB() On Error Resume Next derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row MsgBox derL End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B, je n'ai rien trouvé de mieux que ( ne risez pas ! ) : DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row) Sauriez-vous me proposer quelque chose de plus simple ?
retourne la dernière ligne occupé par une donnée ou une formule dans la colonne a:b
Si tu veux obtenir la dernière ligne occupée par une donnée (nonobstant les formules) tu devras dans la ligne de code utilisé : derL = [A:B].Find("*", , xlValues, , xlByRows, xlPrevious).Row
Exemple : Si la dernière ligne retourne "" d'une formule : =si(G5=1;"";2)
Le paramètre xLFormulas tiendras compte de cette ligne tandis que le paramètre XlValues n'en tiendra pas compte et retournera la dernière cellule affichant une donnée.
"garnote" a écrit dans le message de news: Merci RGI.
SG
"RGI" a écrit dans le message de news: e%23R$
Bonjour
ça peut-être
Sub derlAB() On Error Resume Next derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row MsgBox derL End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B, je n'ai rien trouvé de mieux que ( ne risez pas ! ) : DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row) Sauriez-vous me proposer quelque chose de plus simple ?
Serge
Ainsi que moi-même.
Serge
"RGI" <nospam.gilbert@discussions.microsoft.com> a écrit dans le message de news: %23qmc4xlZHHA.5044@TK2MSFTNGP05.phx.gbl...
retourne la dernière ligne occupé par une donnée ou une formule dans la colonne a:b
Si tu veux obtenir la dernière ligne occupée par une donnée (nonobstant les formules)
tu devras dans la ligne de code utilisé :
derL = [A:B].Find("*", , xlValues, , xlByRows, xlPrevious).Row
Exemple : Si la dernière ligne retourne "" d'une formule :
=si(G5=1;"";2)
Le paramètre xLFormulas tiendras compte de cette ligne tandis
que le paramètre XlValues n'en tiendra pas compte et retournera
la dernière cellule affichant une donnée.
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news: uNJfCAkZHHA.4808@TK2MSFTNGP04.phx.gbl...
Merci RGI.
SG
"RGI" <nospam.gilbert@discussions.microsoft.com> a écrit dans le message de news: e%23R$PrjZHHA.4772@TK2MSFTNGP05.phx.gbl...
Bonjour
ça peut-être
Sub derlAB()
On Error Resume Next
derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row
MsgBox derL
End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B,
je n'ai rien trouvé de mieux que ( ne risez pas ! ) :
DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row)
Sauriez-vous me proposer quelque chose de plus simple ?
retourne la dernière ligne occupé par une donnée ou une formule dans la colonne a:b
Si tu veux obtenir la dernière ligne occupée par une donnée (nonobstant les formules) tu devras dans la ligne de code utilisé : derL = [A:B].Find("*", , xlValues, , xlByRows, xlPrevious).Row
Exemple : Si la dernière ligne retourne "" d'une formule : =si(G5=1;"";2)
Le paramètre xLFormulas tiendras compte de cette ligne tandis que le paramètre XlValues n'en tiendra pas compte et retournera la dernière cellule affichant une donnée.
"garnote" a écrit dans le message de news: Merci RGI.
SG
"RGI" a écrit dans le message de news: e%23R$
Bonjour
ça peut-être
Sub derlAB() On Error Resume Next derL = [A:B].Find("*", , xlFormulas, , xlByRows, xlPrevious).Row MsgBox derL End Sub
salutations
RGI
Bonjour,
Pour trouver la ligne de la dernière cellule remplie dans la plage A:B, je n'ai rien trouvé de mieux que ( ne risez pas ! ) : DL = WorksheetFunction.Max(Range("A65536").End(xlUp).Row, Range("B65536").End(xlUp).Row) Sauriez-vous me proposer quelque chose de plus simple ?
Serge
FG
Bonjour,
Est-ce possible d'avoir la même chose avec une formule plutot qu'un VBA, sachant qu'il peut y avoir des cellules vides dans la colonne scrutée ?
Merci d'avance. FG
Bonjour,
Est-ce possible d'avoir la même chose avec une formule plutot qu'un VBA,
sachant qu'il peut y avoir des cellules vides dans la colonne scrutée ?