Numéro de colonne première cellule non vide d'une ligne

Résolu/Fermé
milka - Modifié par Whismeril le 11/05/2015 à 10:58
 milka - 11 mai 2015 à 11:56
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.
A voir également:

1 réponse

ccm81 Messages postés 10544 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 18 mars 2023 2 336
11 mai 2015 à 11:25
Bonjour

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

Cdlmnt
0
Merci, c'est parfait!
0