Automating popups in vba

[MikeFranz123]

Hi,

I'm running a macro wherein I delimit columns. Excel then asks me if I want to replace the contents of the destination cells. Is there anyway I can automate the process so that the macro selects the "ok" option without asking me for input?

Thank you all!

[jraj1106]

Hi
Pls upload sample file...

[MikeFranz123]

Hey, sorry for the delayed reply!

Yeah, here is some of the code.

Sub countSKUs()
Workbooks(ConsolidatedFile).Activate
Range("A1").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
:="-", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True
ActiveSheet.Range("$A$1:$A$20000").RemoveDuplicates Columns:=1, Header:=xlNo
Range("B1").Select
ActiveCell.FormulaR1C1 = "=COUNTA(R[1]C[-1]:R[100000]C[-1])"
Range("B2").Select
numberSKUsOnline = Range("B1").Value
thisWorkbook.Activate
Range("P4").Value = numberSKUsOnline
Range("J4:L100").Clear
End Sub

I'm sorry its ugly, I don't know if there is a better way to paste code here.

Anyway, when it delimits the columns it asks me if I want to replace the destinations contents, and I want to skip that without having to click "OK". Is there a way to do that?
Thanks!

[MikeFranz123]

Hey, managed to work it out, thanks for all the help though!

[Firefly2012]

You should be able to achieve that by setting:

Please Login or Register  to view this content.