LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.misc
SNM SNM is offline
external usenet poster
 
Posts: 5
Default Automate text import wizard in a protected sheet

Hi,

Rows with old data is protected in the sheet and the new data has to
be entered (in unprotected cells) using text import wizard. For this,
how can I automate text import wizard to run on a protected sheet? I
came up with the following, but its gives an error to run on a
protected sheet.

Sub Macro3()
'
' Macro3 Macro
' Macro recorded 2/4/2008 by cipl9
'
' Keyboard Shortcut: Ctrl+q
'
ActiveSheet.PasteSpecial Format:="Unicode Text", Link:=False, _
DisplayAsIcon:=False

Selection.TextToColumns Destination:=Range("F2885"),
DataType:=xlDelimited _
, TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False,
Tab:=False, _
Semicolon:=False, Comma:=False, Space:=False, Other:=True,
OtherChar _
:="|", FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1),
Array(4, 1), Array(5, _
1), Array(6, 1), Array(7, 1), Array(8, 1), Array(9, 1),
Array(10, 1), Array(11, 1), Array(12 _
, 1), Array(13, 1), Array(14, 1), Array(15, 1), Array(16, 1),
Array(17, 1), Array(18, 1), _
Array(19, 1), Array(20, 1), Array(21, 1), Array(22, 1),
Array(23, 1), Array(24, 1)), _
TrailingMinusNumbers:=True

End Sub

I look forward to learning about the solution. Thanking in advance.
SNM




 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Text Import Wizard bozinomi Excel Discussion (Misc queries) 1 November 9th 06 01:25 PM
Text Import Wizard Duncan Help Excel Discussion (Misc queries) 1 July 27th 06 03:38 PM
Text Import Wizard Prema Excel Discussion (Misc queries) 3 April 5th 06 03:11 PM
Automate the Text Import Wizard (Fixed Width) Yagnesh Excel Worksheet Functions 5 August 25th 05 08:08 PM
Text Import Wizard Pieter G Excel Discussion (Misc queries) 1 July 18th 05 11:49 AM


All times are GMT +1. The time now is 02:28 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"