Bonjour j'ai un petit souci car j'ai encore du mal à savoir ce que retourne les fonction et je n'ai pas forcement les meilleurs méthodes pour coder en vba
je vous présente la mienne
si la cellule "Ax" contient calcul sarant alors on etire la formule située en "Cx" par rapport aux nombre des points qu'on a (on ne le sait pas a l'avance) c'est pour cela que j'etire mon remplissage en fonction du nombre de colonnes que j'ai sur la premiere ligne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Range("A1").Select While Selection <> "" If Selection.Value Like "Calcul Saran" Then Selection.Offset(0, 2).AutoFill Destination:=Range(Selection.Offset(0, 2), Selection.Offset(0, Range("C1", Range("C1").End(xlToRight)).Columns.Count + 1)), Type:=xlFillDefault 'CORRIGE Else Selection.Offset(1, 0).Select End If Wend
mais ma fonction ne fonctionne pas =/
"method range of object global failed"
que dois-je corriger pour la faire fonctionner?
cordialement
EDIT: j'ai réussi a corriger ma fonction, résolu
Partager