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

• #2954 vilag tag Delila_1 #2953

  Új Válasz 2017-12-13 08:59:54 #2954

  Ú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

  

  vilag

  tag

  válasz Delila_1 #2953 üzenetére

  Köszönöm a javaslatot.

  Ma már kínlódtam vele vagy két óra hosszát, de belekavarodom a dologba és most teljesen máshogy akarom újra kezdeni.

  Most épp látom a fényt az alagút végén, de csak pislákol.

  A javaslatodat használva próbálkoztam, de nem teljesen hozza a várt eredményt.
  Jelen formájában kiszínezi a kijelölt cellát vagy cellákat, azonban ha újabb cellát vagy cellákat jelölök ki akkor azokat is kiszínezi (az elősző színezések meghagyásával).

  A célom az lenne, hogy a kijelölt cellák sorait jelölje ki és az esetlegesen korábban kijelölt cella/cellák sorainak színezését pedig szüntesse meg.

  A fejemben már össze is állta a dolog el is kezdtem megírni, de ott elakadtam, hogy több sort érintő kijelölés esetén csak az első sor sorának a számát tudom lekérdezni pl ezzel sorok = Selection.Row
  pedig nekem a kijelölés kezdő és végsorának számára is szükségem lenne.

  Próbáltam Selection.Address kóddal is de abból meg csak kerülő úton tudnám a sorok számát kinyerni.

  Van esetleg erre valami egyszerűbb megoldás?

  Egyébként nagyjából így képzelném a kódot:

  Cells.Interior.Pattern = xlNone 'összes színezés megszüntetése a munkalapon

kijelolttartomanysorai = ????

Rows(kijelolttartomanysorai).Interior.Color = vbYellow

  Így visszanézve kissé viccel, hogy egy 3 soros kóddal bajlódom két órája

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