*

Help!

Problemen met uw pc? De vrijwilligers van oplossing.be zoeken gratis met u mee! 8)

Meer weten over Oplossing.be?

Hoe stel ik een vraag?

Recent

Auteur Topic: excel macro  (gelezen 1841 keer)

Offline meey

  • Nieuw lid
  • Berichten: 6
  • Geslacht: Vrouw
  • Oplossing.be
excel macro
« Gepost op: 08 mei 2017, 23:37:20 »
Sub kleuren()

For i = 3 To 14
Range("actReg").Value = Range("KleurenMacros!A" & i).Value
ActiveSheet.Shapes(Range("actReg").Value).Select (deze werkt niet kan iemand zeggen wat er fout is, is geel gearceerd)

Selection.ShapeRange.Fill.ForeColor.RGB = Range(Range("actRegCode").Value).Interior.Color

Next i

Range("A5").Select
End Sub

Alles werk behalve dus ActiveSheet


Offline meey

  • Nieuw lid
  • Berichten: 6
  • Geslacht: Vrouw
  • Oplossing.be
Re: excel macro
« Reactie #1 Gepost op: 09 mei 2017, 10:56:43 »
Gevonden!

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 16.842
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: excel macro
« Reactie #2 Gepost op: 09 mei 2017, 12:05:39 »
Hallo meey,

Waarschijnlijk was "actReg" een benoemd bereik, en was dat het struikelblok.
Daarom is het ook altijd zo nuttig om een voorbeeldbestandje bij te voegen, zegt zo veel meer dan een vraag alleen  ;)

:) SoftAid :)             
Wegens veelvuldig melden van dubbelposten, het posten op verschillende help-fora van dezelfde vraag, zijn de gedragsregels op dit forum aangepast. Dubbelposten dient in de toekomst op voorhand gemeld te worden, met een melding en een link naar het topic op de andere site. De helpers wensen een weinig respect voor de inspanningen die ze doen om mensen te helpen. Je doet jezelf ook een plezier. Door je dubbelposten te melden wordt je vraag op meerdere fora beantwoord.

 


www.combell.com