VBA: Auto answer pop up message

[datastudent]

Hi,

How do I automatically answer OK on my pop?

Here is the action that triggers the pop up message.

.Columns("B:B").TextToColumns Destination:=Range("B1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=True, Space:=False, Other:=False, FieldInfo _
:=Array(1, 1), TrailingMinusNumbers:=True

 

[Joe4]

You can temporarily suppress alerts by inserting this line before the code you have above:

Application.DisplayAlerts = False

Then add this line after that, to turn them back on:

Application.DisplayAlerts = True

 

[datastudent]

You can temporarily suppress alerts by inserting this line before the code you have above:

Application.DisplayAlerts = False

Then add this line after that, to turn them back on:

Application.DisplayAlerts = True

Thanks! It works!

 

[Joe4]

You are welcome.
Glad I was able to help!