Actuellement sur ma feuille, je travaille avec des 'commandButtons' pour accéder aux divers comptes dans lesquels j'y inscrits des chiffres.
Private Sub GoBilanA_Click()
Dim L As Integer
L = Range('E14').End(xlUp).Row+1
Range('E' & L).Select
End Sub
Celà fonctionne très bien. Mais ça se gâte si je veux le faire sur une autre feuille!!
Quel est l'instruction à donner pour faire exécuter ma commande sur une autre feuille??
J'y avais déjà pensé, mais il me fait un'1004 méthode sélect de la classe Range à échoué'.
Si j'exécute depuis la bonne feuille, cela fonctionne bien. Mais ça ne me sert à rien....
A+
J'ai encore quelque chose d'incompréhensible qui se passe.
La CommandButton1 de la 'feuille 1':
Private Sub CommandButton1_Click()
Sheets('Bilan').Select
Dim L As Integer
L = Range('E15').End(xlUp).Row + 1
ActiveSheet.Range('E' & L).Select
End Sub
devrait fonctionner de la même manière que la CommandButton2 de la feuille 'Bilan':
Private Sub CommandButton2_Click()
Dim L As Integer
L = Range('E15').End(xlUp).Row + 1
Range('E' & L).Select
End Sub
Même erreur, Borello ! Quand j'ai défini L, j'ai oublié ActiveSheet
Private Sub CommandButton1_Click()
Sheets('Bilan').Select
Dim L As Integer
L = ActiveSheet.Range('E15').End(xlUp).Row + 1
ActiveSheet.Range('E' & L).Select
End Sub