Styjun

Dropping outliers based on "2.5 times the RMSE"

Too many spies!

Won 50K! Now what should I do with it

Why did my rum cake turn black?

Cutting machine can't read vectors with strokes

Did any of the founding fathers anticipate Lysander Spooner's criticism of the constitution?

Are randomly-generated passwords starting with "a" less secure?

Multiple MAIN signatures

Trying to find a flaw in my proof that there are more rearrangements of an infinite series than real numbers

Cubic programming and beyond?

nmcheck.gnome.org facilitating ads?

Bob's unnecessary trip to the shops

As the Dungeon Master, how do I handle a player that insists on a specific class when I already know that choice will cause issues?

A "Simple" Task

How to repair a laptop's screen hinges?

Password maker in C#

Does Google Maps take into account hills/inclines for route times?

Is purchasing foreign currency before going abroad a losing proposition?

Is killing off one of my queer characters homophobic?

As a DM, how to avoid unconscious metagaming when dealing with a high AC character?

Historic symbols representing peasants/oppressed persons fighting back?

What is this welding tool I found in my attic?

Do native speakers use ZVE or CPU?

Would letting a multiclass character rebuild their character to be single-classed be game-breaking?

Error using Range Method in VBA Excel (parameter setting)

Is there a way to crack the password on an Excel VBA Project?Excel VBA to determine last non-value (IE may have a formula but no value) row in columnHow to avoid using Select in Excel VBAReferring to Dynamic Named Ranges in VBAExcel VBA - read cell value from codeVBA in Excel, loop continues to runTake the date in one worksheet and find the same date in another worksheet column and return the cell reference for that date to use in a loopExcel VBA macro to send emails to unique users in rangeexcel VBA code to ignore an email attachment if missing from folderWhy macros with cell.value stop work and give me back error 2015?

.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty margin-bottom:0;

0

I declared ColorCell variable and used Set in order to make some color change using For loop.

But it raises an error when coding it and I couldn't interpret the debug explanation.

Sub 계산() 
 Dim SumVariable As Integer
 Dim i As Integer
 Dim ColorCell As Range
 Set ColorCell = Range("D" & i)

 For i = 3 To Range("D14").End(xlUp).Row
 If Cells(i, "D") > 300 Then
 MsgBox ("haha!")

 Cells(i, "D").Value = 10
 Range("D4").CurrentRegion.Select
 ColorCell.Interior.Color = vbYellow 
 End If
 Next i 
End Sub

excel vba

share|improve this question

edited Mar 26 at 7:38

Pᴇʜ

29.1k66 gold badges3030 silver badges5454 bronze badges

asked Mar 26 at 5:27

BangolPhoenixBangolPhoenix

3411 silver badge77 bronze badges

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  
  You have Set ColorCell = Range("D" & i) but i is zero at that point.
  
  – Tim Williams
  Mar 26 at 5:35
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Thank you so much for your answer! Do I have to initialize it right after "Dim" declaration statement in that case ?
  
  – BangolPhoenix
  Mar 26 at 6:17
  

  
  
  
  


• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  
  It’s not very clear what your code should do, but that line should probably be inside your loop.
  
  – Tim Williams
  Mar 26 at 6:22
  

  
  
  
  

add a comment | 

0

I declared ColorCell variable and used Set in order to make some color change using For loop.

But it raises an error when coding it and I couldn't interpret the debug explanation.

Sub 계산() 
 Dim SumVariable As Integer
 Dim i As Integer
 Dim ColorCell As Range
 Set ColorCell = Range("D" & i)

 For i = 3 To Range("D14").End(xlUp).Row
 If Cells(i, "D") > 300 Then
 MsgBox ("haha!")

 Cells(i, "D").Value = 10
 Range("D4").CurrentRegion.Select
 ColorCell.Interior.Color = vbYellow 
 End If
 Next i 
End Sub

excel vba

share|improve this question

edited Mar 26 at 7:38

Pᴇʜ

29.1k66 gold badges3030 silver badges5454 bronze badges

asked Mar 26 at 5:27

BangolPhoenixBangolPhoenix

3411 silver badge77 bronze badges

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  
  You have Set ColorCell = Range("D" & i) but i is zero at that point.
  
  – Tim Williams
  Mar 26 at 5:35
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Thank you so much for your answer! Do I have to initialize it right after "Dim" declaration statement in that case ?
  
  – BangolPhoenix
  Mar 26 at 6:17
  

  
  
  
  


• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  
  It’s not very clear what your code should do, but that line should probably be inside your loop.
  
  – Tim Williams
  Mar 26 at 6:22
  

  
  
  
  

add a comment | 

I declared ColorCell variable and used Set in order to make some color change using For loop.

But it raises an error when coding it and I couldn't interpret the debug explanation.

Sub 계산() 
 Dim SumVariable As Integer
 Dim i As Integer
 Dim ColorCell As Range
 Set ColorCell = Range("D" & i)

 For i = 3 To Range("D14").End(xlUp).Row
 If Cells(i, "D") > 300 Then
 MsgBox ("haha!")

 Cells(i, "D").Value = 10
 Range("D4").CurrentRegion.Select
 ColorCell.Interior.Color = vbYellow 
 End If
 Next i 
End Sub

excel vba

share|improve this question

edited Mar 26 at 7:38

Pᴇʜ

29.1k66 gold badges3030 silver badges5454 bronze badges

asked Mar 26 at 5:27

BangolPhoenixBangolPhoenix

3411 silver badge77 bronze badges

Sub 계산() 
 Dim SumVariable As Integer
 Dim i As Integer
 Dim ColorCell As Range
 Set ColorCell = Range("D" & i)

 For i = 3 To Range("D14").End(xlUp).Row
 If Cells(i, "D") > 300 Then
 MsgBox ("haha!")

 Cells(i, "D").Value = 10
 Range("D4").CurrentRegion.Select
 ColorCell.Interior.Color = vbYellow 
 End If
 Next i 
End Sub

share|improve this question

edited Mar 26 at 7:38

Pᴇʜ

29.1k66 gold badges3030 silver badges5454 bronze badges

asked Mar 26 at 5:27

BangolPhoenixBangolPhoenix

3411 silver badge77 bronze badges

share|improve this question

edited Mar 26 at 7:38

Pᴇʜ

29.1k66 gold badges3030 silver badges5454 bronze badges

asked Mar 26 at 5:27

BangolPhoenixBangolPhoenix

3411 silver badge77 bronze badges

edited Mar 26 at 7:38

Pᴇʜ

29.1k66 gold badges3030 silver badges5454 bronze badges

edited Mar 26 at 7:38

Pᴇʜ

29.1k66 gold badges3030 silver badges5454 bronze badges

asked Mar 26 at 5:27

BangolPhoenixBangolPhoenix

3411 silver badge77 bronze badges

asked Mar 26 at 5:27

BangolPhoenixBangolPhoenix

3411 silver badge77 bronze badges