Recuperation d'info

KAR-inette · 20 Avril 2005

Bonjour à tous .....
J'ai un problème que je n'arrive pas à résoudre ....:-((
Comment récupérer la cellule non vide d’une colonne A sur une cellule B1 ….
Le problème c’est que cette cellule non vide n’est pas un chiffre, et que le mot change tout les jour, et se déplace de cellule en cellule (mais il reste toujours sur la colonne A) ….
Je ne peux pas utiliser la fonction MAX, du fait que ce n’est pas un chiffre …. Si quelqu’un peut m’aider ……
Merci à tous

bertrand · 20 Avril 2005

bonjour,

si ta colonne A est vide, le code suivant devrait resoudre ton souci.

Sub recup_val()
Range('b1').Value = Range('a1').End(xlDown).Value
End Sub

a+

dg62 · 20 Avril 2005

Bonjour Kar-inette, Bertrand, Le Forum

ce petit bout de code trouve une cellule contenant du texte dans une colonne de chiffres.

Code:

Sub recup()
    Dim cel As Range
    For Each cel In Range('A:A')
        If (VarType(cel.Value)) = 8 Then
            Range('B1').Value = cel.Value
        End If
    Next
End Sub

Recuperation d'info

KAR-inette

Guest

bertrand

Guest

dg62

XLDnaute Barbatruc

Discussions similaires