Menu

Numéro de colonne première cellule non vide d'une ligne [Résolu/Fermé]

-
Bonjour,
J'ai des tableaux avec des livraisons par produit (lignes) et par semaine (colonne), et je dois afficher dans une colonne la semaine de première livraison de chaque produit, c'est à dire la première cellule non vide dans chaque ligne.

Voici une fonction perso dans vba que j'ai testée mais qui ne fonctionne pas.. :

Function semdeb(a As Integer, b As Integer) As Integer
'
Dim i As Integer
'
    Range(Cells(a, b)).Select
    Selection.End(xlToRight).Select
    i = ActiveCell.Column
    Range(Cells(1, i)).Select
    semdeb = ActiveCell.Value
    
End Function


Merci!

EDIT: Ajout de la coloration syntaxique.
Afficher la suite 

1 réponse

Messages postés
9003
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 juin 2019
1589
0
Merci
Bonjour

Essaies ceci
li = n° de la ligne à traiter
co = Cells(li, 1).End(xlToRight).Column

Cdlmnt
Merci, c'est parfait!