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

• #10350 Fire/SOUL/CD félisten Oly #10349

  Új Válasz 2011-05-17 19:20:07 #10350

  Ú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

  

  Fire/SOUL/CD

  félisten

  válasz Oly #10349 üzenetére

  Akkor miért az Excel topikban kérded? Nagyobb a forgalom gondolom...
  Amúgy meg nem bonyolult, beteszem a kódot, hátha másnak jól jön valamikor

  Private Sub CommandButton1_Click()
  
  Dim MyFxs As WorksheetFunction
  Dim MySrcRange As Range, MyDestRange As Range
  
  Set MyFxs = Application.WorksheetFunction
  Set MySrcRange = Sheets("Munka1").Range("A1")
  Set MyDestRange = Sheets("Munka1").Range("A2")
  
  MyDestRange = MyFxs.WorkDay(MySrcRange, 1) + _
  TimeSerial(Hour(MySrcRange), Minute(MySrcRange), Second(MySrcRange))
  
  End Sub

  UI: Az Access-el az a "gond", hogy a feltett kérdések egy részéhez az embernek le kell gyártani a táblát, de néha az sem elég, mert több tábla, meg a kapcsolatok stb stb kellenek ahhoz, hogy egyáltalán lehessen segíteni, szóval ilyen esetekben van amikor az egész adatbázis kellene...

  [ Szerkesztve ]

  Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)

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