Visual Basic Programming
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
User Name:
Password:
Remember me
Go Back   Dev Shed ForumsProgramming Languages - MoreVisual Basic Programming

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread Dev Shed Forums Sponsor:
  #1  
Old November 13th, 2003, 12:01 PM
kb2003 kb2003 is offline
Junior Member
Dev Shed Newbie (0 - 499 posts)
 
Join Date: Nov 2003
Posts: 1 kb2003 User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 0
Specifying text file format

Help please!
I need to take info from an excel spreadsheet and put it into a text file. Ok, but, the text file has to have a specific length and format.
How do I specify the text file format from my excel spreaddie ?
Any help would be appreciated.

Reply With Quote
  #2  
Old November 13th, 2003, 07:23 PM
cleverpig cleverpig is offline
Contributing User
Dev Shed Beginner (1000 - 1499 posts)
 
Join Date: Jul 2003
Posts: 1,152 cleverpig User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 7
Send a message via MSN to cleverpig
Export Access Tables to Excel Worksheet sample: Application uses DAO to list tables in Access database; you select one table at a time to export to new or existing excel workbook
http://www.freevbcode.com/source/export_excel.zip

Export Access Tables to Other Formats Using a SQL Statement sample:You can use a Common Dialog control placed on a form somewhere to use this, or set opnFilename to the complete path and filename with extension. Also you will need to have Microsoft DAO 3.51 or 3.6 referenced. From what I have seen and used so far, the table name must not have spaces in it to do this. I personally just temporarily renamed the table and then used it.

'declare
Dim opnFileName As String
Dim strTempStr As String
Dim tableName As String
Dim intFileSep As Integer
Dim DatabaseName As Database

'code
For intFileSep = Len(opnFileName) To 1 Step -1
If Mid$(opnFileName, intFileSep, 1) = "\" Then Exit For
Next intFileSep

strTempStr = "SELECT * INTO [dBase IV;DATABASE=" + _
Left$(opnFileName, intFileSep - 1) + "].[" + _
Left$(Right$(opnFileName, Len(opnFileName) - intFileSep), _
Len(Right$(opnFileName, Len(opnFileName) - intFileSep)) - _
4) + "]" & " FROM ["& tableName &"]"

DatabaseName.Execute strTempStr

U can see http://forums.devshed.com/showthrea...t=export+access

Reply With Quote
  #3  
Old December 9th, 2003, 02:44 PM
nickjc nickjc is offline
Banned
Dev Shed Newbie (0 - 499 posts)
 
Join Date: Dec 2003
Location: UK
Posts: 23 nickjc User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 0
I usually use CSV (comma seperated values) to move data between Excel and text files and it doesn't matter how long the fields are. Just a thought.

Nick

Reply With Quote
  #4  
Old December 10th, 2003, 02:12 AM
cleverpig cleverpig is offline
Contributing User
Dev Shed Beginner (1000 - 1499 posts)
 
Join Date: Jul 2003
Posts: 1,152 cleverpig User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 7
Send a message via MSN to cleverpig
Yes,nickjc's advice is better!

Reply With Quote
Reply

Viewing: Dev Shed ForumsProgramming Languages - MoreVisual Basic Programming > Specifying text file format


Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump


Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2008 by Developer Shed. All rights reserved. DS Cluster 4 hosted by Hostway
Stay green...Green IT