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

• #44091 tomi_x tag Véreshurka #44089

  Új Válasz 2020-05-20 16:18:30 #44091

  Ú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

  

  tomi_x

  tag

  válasz Véreshurka #44089 üzenetére

  Így megy nekem is.
  De úgy kellene megoldanom, hogy amint egy cellába valaki beír adatot az zárolt legyen, vagy esetleg egy vezérlő gombbal megoldani, hogy "adatbevitel lezárása".

• #44088 Fferi50 Topikgazda Véreshurka #44086

  Új Válasz 2020-05-20 14:37:50 #44088

  Ú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

  

  Fferi50

  Topikgazda

  válasz Véreshurka #44086 üzenetére

  Szia!
  Hát persze, ez csak a makró "teste" volt.
  Sub - End Sub közé kell tenni.
  Üdv.

• #44077 Fferi50 Topikgazda Véreshurka #44075

  Új Válasz 2020-05-20 11:42:08 #44077

  Ú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

  

  Fferi50

  Topikgazda

  válasz Véreshurka #44075 üzenetére

  Szia!
  A makró:
  For Each cl In Range("A1:A8").Cells
     cl.formula="=IFERROR(" & mid(cl.Formula,2) & ","""")"
Next
  A vessző és a zárójel közé 4 idézőjel kell. Így üres marad a cella hiba esetén.
  Ha szöveget is szeretnél kiíratni, akkor két - két idézőjel közé írd be a szöveget.
  Üdv.

• #44073 Fferi50 Topikgazda Véreshurka #44071

  Új Válasz 2020-05-20 11:05:21 #44073

  Ú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

  

  Fferi50

  Topikgazda

  válasz Véreshurka #44071 üzenetére

  Szia!
  Képletfajtánként egyet-egyet átírsz, azután másolod a képletet.
  Másképp nem megy sajnos.
  Üdv.

• #43673 Fferi50 Topikgazda Véreshurka #43672

  Új Válasz 2020-04-23 17:08:42 #43673

  Ú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

  

  Fferi50

  Topikgazda

  válasz Véreshurka #43672 üzenetére

  Szia!
  Ezt próbáld ki még Lappy javaslata mellé (az ugyanis csak az x tengelyt formázza):
  Sub formaz()
Dim diag As Object, src As Series
    For Each diag In Sheets
        If TypeName(diag) = "Chart" Then
           For Each src In diag.SeriesCollection
               src.HasDataLabels = True
               src.DataLabels.NumberFormat = "#,##0.00"
           Next
        End If
     Next
End Sub
  Üdv.

• #43671 lappy őstag Véreshurka #43670

  Új Válasz 2020-04-23 16:30:49 #43671

  Ú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

  

  lappy

  őstag

  válasz Véreshurka #43670 üzenetére

  Sub ChangingTheNumberFormat()
ActiveChart.Axes(xlValue).TickLabels.NumberFormat = "$#,##0.00"
End Sub
ez igaz vba de talán használható

• #43669 Fferi50 Topikgazda Véreshurka #43668

  Új Válasz 2020-04-23 14:34:44 #43669

  Ú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

  

  Fferi50

  Topikgazda

  válasz Véreshurka #43668 üzenetére

  Szia!
  "2 tizedes jegyig kerekítsen az excel" Szerintem itt arra gondoltál, hogy 2 tizedest jelenítsen meg. (Mert a kerekítést függvénnyel lehet megoldani.)
  Ha minden munkalapon azonos cellákról van szó, akkor
  - kijelölöd a munkalapokat csoportként
  - kijelölöd a kívánt cellákat
  - jobb egérgomb - cellaformázás - beállítod a számformátumot.
  Eredmény: az adott cellatartomány minden kijelölt munkalapon kijelölődik és formázódik.
  Ezt nagyobb cellatartományra is meg tudod csinálni.
  Diagramokkal nem próbáltam, megnézheted, hogy az adatsort vagy a tengely kijelölve működik-e a formázás.
  Üdv.

• #36103 Véreshurka senior tag Véreshurka #36102

  Új Válasz 2017-09-11 15:35:06 #36103

  Ú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

  

  Véreshurka

  senior tag

  válasz Véreshurka #36102 üzenetére

  Közben megett:

  =HA(R8<G8;0;HA(ÉS(R8<K8;R8>=G8);1;HA(R8>=K8;2;"")))

  Ha valakinek is lenne hasonló gondja...

  A fájlt kitöröltem, ha valakinek kellene privátban érdeklődjön.

• #33666 Delila_1 veterán Véreshurka #33621

  Új Válasz 2017-01-16 09:43:37 #33666

  Ú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 Véreshurka #33621 üzenetére

  Próbáld az Excel beállításai | Népszerű elemek | Színséma beállítást módosítani, hátha...

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