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

• #52614 Lasersailing senior tag Delila_1 #52603

  Új Válasz 2024-05-10 10:26:38 #52614

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Lasersailing

  senior tag

  válasz Delila_1 #52603 üzenetére

  Köszönöm, küzdök továbbra is

  Most a gondom az alábbi: (és valószínűleg a háttérbeli ok ugyanaz: nem ismerem a formátumokat excel vba-ban)

  Az alábbi függvényrészlet soha nem talál egyezőséget, pedig ránézésre (inputbox alapján) ugyanaz a két érték pl. sm=4-nél (lásd képernyőkép később)

    sm = 3
  Do
    sm = sm + 1
  'Loop Until year(right(Sheets(sob).Cells(sm, 1).Value,4)),month(mid(Sheets(sob).Cells(sm, 1).Value,4,2),day(left(Sheets(sob).Cells(sm, 1).Value,2))) = datum
  InputBox (Sheets(sob).Cells(sm, 1).Value & Chr(13) & Right(Kiszallitasform.datumok.Value, 2) & "/" & Mid(Kiszallitasform.datumok.Value, 6, 2) & "/" & Left(Kiszallitasform.datumok.Value, 4))
  
  Loop Until Sheets(sob).Cells(sm, 1).Value = Right(Kiszallitasform.datumok.Value, 2) & "/" & Mid(Kiszallitasform.datumok.Value, 6, 2) & "/" & Left(Kiszallitasform.datumok.Value, 4)


  (A sob sheeten az értékeket összehúzva dátumként kezeli az A oszlop értékeit.)

  Egyezőségről képernyőkép:
  
  
  Mi lehet a gond és főleg mi a megoldás?
  kiszallitasform.datumok tulajdonságai:

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