Variable VBA
Résolu
Ecam39
Messages postés
286
Date d'inscription
Statut
Membre
Dernière intervention
-
Ecam39 Messages postés 286 Date d'inscription Statut Membre Dernière intervention -
Ecam39 Messages postés 286 Date d'inscription Statut Membre Dernière intervention -
2 réponses
Bonjour,
Pourquoi en macro (et pas par formules) ?
Pour la dernière ligne, on fait normalement xlUp.
Ton if n'est pas bon : si c'est vide on calcule (--> impossible), si ce n'est pas vide on ne fait rien.
A+
Pourquoi en macro (et pas par formules) ?
Pour la dernière ligne, on fait normalement xlUp.
Ton if n'est pas bon : si c'est vide on calcule (--> impossible), si ce n'est pas vide on ne fait rien.
A+
La ce sont des juste des formules, mais je vais rajouter des lignes tous les jours. Ensuite rajouter des TCD et graphiques.
Ce fichier de base va me servir à alimenter tous mes autres onglets.
Pour la fonction je m'en suis aperçu entre temps dsl (c'est not IsEmpty).
Ce fichier de base va me servir à alimenter tous mes autres onglets.
Pour la fonction je m'en suis aperçu entre temps dsl (c'est not IsEmpty).
J'ai fais ceci et ça fonctionne
Sub calculs_cyclisme()
'Initialisation de la variable sur les lignes à calculer
Dim Calculs As Long
Calculs = 1
'Lancement de la boucle sur la colonne A
For Calculs = 2 To Range("A2").End(xlDown).Row
'Conditions de calculs
If Not IsEmpty(Cells(Calculs, 1)) Then
Cells(Calculs, 2) = Month(Cells(Calculs, 1))
Cells(Calculs, 6) = Cells(Calculs, 4) / (Cells(Calculs, 5) / 60)
Else
End If
Next
End Sub