Új hozzászólás Aktív témák

  • Timer

    veterán

    válasz Fferi50 #31883 üzenetére

    Szia!

    Még mindig ugyanaz a makró van napirenden, de adódott két újabb kérdésem vele kapcsolatban:

    - Megoldható-e, hogy az Excel dokumentum megnyitásakor a kurzor már alapból a szövegbeviteli cellán legyen? Jelenleg bele kell kattintani a mezőbe az adat beviteléhez, pontosabban, ha ezen a cellán áll, mentéskor az Excel megőrzi a pozíciót, de ha esetleg félrekattintva ment, akkor ez már nem igaz. Jó lenne kikényszeríteni ezt valahogy a programból.

    - Megoldható-e, hogy két keresési ciklus között (tehát amikor bevisz egy cikkszámot, amihez kapcsolódóan a makró megnyitja a hálózaton lévő fájlt, de újabb cikkszám bevitel még nem történt meg) ne az előzőleg bevitt cikkszám legyen, hanem mondjuk egy nulla, vagy egy "Olvassa be a vonalkódot!" felirat?

    Köszönöm a válaszaidat előre is! ;)

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("C2")) Is Nothing Then
    Application.EnableEvents = False
    ActiveWorkbook.FollowHyperlink Address:=Sheets("DATA").Range("$A$2:$A$1000").Find(What:=Target.Value, LookIn:=xlValues, lookat:=xlWhole).Offset(0, 1).Value
    Application.EnableEvents = True
    Range("C2").Select
    End If
    End Sub

Új hozzászólás Aktív témák

Hirdetés