aller a la ligne..

plumazon · 20 Novembre 2007

Bonsoir,

Voici mon probleme :

j'ai une serie de chiffre sur deux lignes completes je voudrais avec une macro chercher un chiffre specifique sur ces lignes. Mon probleme est que je ne sais pas comment faire si le chiffre est ds la deuxieme ligne...
Voici mon code:
col = 4
i = 47
While Cells(i, col) < Sheets("Feuil2").Range("b10").Value
col = col + 1
Wend
Sheets("Feuil2").Range("c11").Value = Sheets("Purchasing").Cells(47, col)
Sheets("Feuil2").Select

Merci d'avance

skoobi · 20 Novembre 2007

Re : aller a la ligne..

Bonsoir,
si j'ai bien compris, à tester:

Code:

Sub test()
c = 0
For i = 47 To 48
    For col = 4 To 256
        If Cells(i, col).Value > Sheets("Feuil2").Range("b10").Value Then
            c = col
            Exit For
        End If
    Next col
    If c = col Then
        r = i
        Exit For
    End If
Next
Sheets("Feuil2").Range("c11").Value = Sheets("Purchasing").Cells(r, c)
Sheets("Feuil2").Select
End Sub

256 est à adapter bien sur.

plumazon · 21 Novembre 2007

Re : aller a la ligne..

....me Skoobi et bonne journee

aller a la ligne..

plumazon

XLDnaute Occasionnel

skoobi

XLDnaute Barbatruc

plumazon

XLDnaute Occasionnel

Discussions similaires

aller a la ligne..

plumazon

XLDnaute Occasionnel

skoobi

XLDnaute Barbatruc

plumazon

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency