change from freefile to a specific sheet to save information

excel vba


I currently have this code saving a Column Letter to a freefile on my pc...

What I need:
I need it now to  save the Column letter to a specific sheet in the current workbook and
"SheetData" and specifically  cell  "A1"


' ENTER VARIABLE HERE FROM TEXT FILE
Dim RowNumber As Integer, FileNum As Integer
Dim InFile As String, Curline As String

InFile = "C:\Program Files\Enterprise\Defaults\Column_Wwg_Located_Worksheet.txt"
FileNum = FreeFile

Open InFile For Input As FileNum

Line Input #FileNum, Curline
mCwrange = Curline
Close #FileNum


Thanks
fordraiders
LVL 3
FordraidersAsked:
Who is Participating?
 
Martin LissOlder than dirtCommented:
To write to a file do something like this
Dim RowNumber As Integer, FileNum As Integer
Dim InFile As String, Curline As String

InFile = "C:\Program Files\Enterprise\Defaults\Column_Wwg_Located_Worksheet.txt"
FileNum = FreeFile

Open InFile For Input As FileNum

Line Input #FileNum, Curline
mCwrange = Curline
Close #FileNum

FileNum = FreeFile
Open FilePath For Output As FileNum ' Change FilePath to your path
Write #FileNum, mCwrange
Close

Open in new window

0
 
Martin LissOlder than dirtCommented:
You haven't actually "saved" anything. Freefile is a just a number used to [/]refer[/i] to a potential file.
0
 
FordraidersAuthor Commented:
thnx
0
 
Martin LissOlder than dirtCommented:
You’re welcome and I’m glad I was able to help.

If you expand the “Full Biography” section of my profile you’ll find links to some articles I’ve written that may interest you.

Marty - Microsoft MVP 2009 to 2017
              Experts Exchange MVE 2015
              Experts Exchange Top Expert Visual Basic Classic 2012 to 2017
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.