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

• #10959 m.zmrzlina senior tag Kornl23 #10957

  Új Válasz 2011-07-26 09:55:56 #10959

  Ú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

  

  m.zmrzlina

  senior tag

  válasz Kornl23 #10957 üzenetére

  Továbbra is a MA() fv-ből indulnék ki.
  Az előző megoldásomat egészítsd ki ezzel:

  Private Sub Workbook_BeforeClose(Cancel As Boolean)
  Application.ScreenUpdating = False
  Range("E1").Select
  For i = 1 To Range("E" & Rows.Count).End(xlUp).Row
  If ActiveCell.Value <> "" Then
  ActiveCell.Copy
  ActiveCell.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
  End If
  ActiveCell.Offset(1, 0).Select
  Next
  ActiveWorkbook.save
  Application.ScreenUpdating = True
  End Sub

  Ez a megoldás a munkafüzet bezárása előtt a dátumokat tartalmazó cellákat felülírja a saját értékükkel, kitörölve egyúttal belőlük a MA() fv-t.

  Ezt nem modulba kell másolni, hanem a ThisWorkbook BeforeClose eseményébe! Természetesen a te tartományaid nyilván mások.

• #10958 m.zmrzlina senior tag Kornl23 #10957

  Új Válasz 2011-07-26 08:34:47 #10958

  Ú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

  

  m.zmrzlina

  senior tag

  válasz Kornl23 #10957 üzenetére

  Az megoldható, hogy a cellát önmagára értékként beillesztjük?

  Tehát ha a feltétel igazzá vált pl. E1-ben akkor: E1-et kijelöl > Ctrl+c > Irányított beillesztés E1-be > Értéket.

• #10956 m.zmrzlina senior tag Kornl23 #10954

  Új Válasz 2011-07-26 08:16:49 #10956

  Ú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

  

  m.zmrzlina

  senior tag

  válasz Kornl23 #10954 üzenetére

  Például így:

  

  Magyarra fordítva: ha a cellától eggyel balra lévő cella értéke bármi más mint semmi (tehát van benne valami) akkor a cella értéke a mai dátum, egyébként üres. Az E oszlopnak dátum formátumot kell adni.

• #10016 Delila_1 veterán Kornl23 #10015

  Új Válasz 2011-04-11 11:40:01 #10016

  Ú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

  

  Delila_1

  veterán

  válasz Kornl23 #10015 üzenetére

  Nincs mit, szívesen.

• #10014 Delila_1 veterán Kornl23 #10013

  Új Válasz 2011-04-11 11:14:22 #10014

  Ú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

  

  Delila_1

  veterán

  válasz Kornl23 #10013 üzenetére

  Az első füzet 3. lap D6 cellájába:

  =[Munkafüzet2]Munka1!$A$1

  Persze a Munkafüzet2 helyett a füzeted nevét, és a Munka1 helyett a lapod nevét írd.

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