Vos meilleures macros et portions de code sont publiées dans cette section. Aucun support sur une question de programmation ici !
Modérateur :Vilains modOOs
Règles du forum Aucune question dans cette section !
Celle-ci rassemble les meilleures macros et portions de code. Vous pouvez en revanche commenter ou argumenter le code exposé. Vous pouvez même remercier l'auteur (cela fait toujours plaisir) en indiquant par exemple dans quel cadre ou contexte vous en avez eu l'utilité.
Si vous avez à poster quelque chose, faites-le depuis la section Macros et API et demandez à un modérateur de l'y déplacer.
sub cell()
Dim oSheetListe As Object
Dim maCellule As Object
oSheetListe = Thiscomponent.Sheets.getByIndex(0)
maCelulle = oSheetListe.getcellRangeByName("A1:E20")
nbL = maCelulle.Rows.Count
nbC = maCelulle.columns.Count
print nbL*nbC
End Sub