VBA Code Modificatoin Needed

I have the following code I need modified to save a text file to an FTP site. The FTP site is saved to my computer. The current code looks into an existing column for the value "1" and if that exists, the code captures the data in a cell several columns over. Then it pops up a save dialog.

What I want to happen is that the file is saved automatically without the dialog box to an FTP site.

This is the file path:

ftp://[login to view URL]

This has been attempted by someone with basic VBA skills, but he ran into a problem saving to an FTP site.

Currently, when the Save dialogue box opens and I try to save to the FTP site I get this error:

"Bad file name or number"

The code is below:

Sub Button1_Click()

Dim r As Range

Dim c As Range

Dim OutputFileNum As Integer

Dim PathName As String

Dim RowNum As Integer

Dim SheetValues() As Variant

Dim filePathVariant As Variant

' displays the save file dialog

filePathVariant = [login to view URL]( _

FileFilter:="Text Files (*.txt), *.txt")

' checks to make sure the user hasn't canceled the dialog

If filePathVariant <> False Then

PathName = filePathVariant

OutputFileNum = FreeFile

Open PathName For Output Lock Write As #OutputFileNum

Set r = [login to view URL]([login to view URL]("AX8"), [login to view URL]("AW8").End(xlDown))

For Each c In [login to view URL]

If [login to view URL] = 50 And [login to view URL] = 1 Then

Print #OutputFileNum, [login to view URL]([login to view URL], 41).Value

End If

Next c

Close OutputFileNum

End If

End Sub

Kemahiran: Visual Basic

Lihat lagi: vba code format text word document, ftp vba excel code upload text file, free code insert text box vba, code vba ftp, convertir code vba php, gnenerate xml code vba excel, code vba refresh access, refresh button code vba, record microphone sourse code vba stop pause, convert lisp code vba, optimization function code vba, ean code vba, ftp code vba, code vba pay, outlook vba code extract text, code vba excel primavera critical path, auto reply text sample submission application, code vba ssl smtp php activex cdo vbnet, java code parse text file, convert perl code vba code, convert md5 hash code plain text, php code drop text message format provider, free code rich text html editor cnet, optimize code vba excel, code read text file

Tentang Majikan:
( 2 ulasan ) Dublin, Ireland

ID Projek: #14795465

Dianugerahkan kepada:


I can fix the macro to save the file properly in ftp site for Eur 50. Relevant Skills and Experience 18 years experience in using Excel as part of daily work life. In the process, implemented lot of automation. Over t Lagi

€50 EUR dalam 2 hari
(43 Ulasan)

10 pekerja bebas membida secara purata €131 untuk pekerjaan ini


Greetings sir, i am an expert freelancer for this job and your 100% satisfaction is assured if you allow me to serve. I can do this task as per your requirement Relevant Skills and Experience I have the 5 year Lagi

€150 EUR dalam 3 hari
(104 Ulasan)

Hey There, Thanks for posting the project. Its looks feasible and am Interested to do it. I am an excel/access VBA automation professional having 7+ years of experience and can do it with the required quality. Nex Lagi

€89 EUR dalam sehari
(73 Ulasan)

I'll fix it Relevant Skills and Experience vba Proposed Milestones €155 EUR - default

€155 EUR dalam 3 hari
(22 Ulasan)

VBA is a obsolete technology. You should use VB.Net or C# to create program which can solve your problem easily. Thanks. Relevant Skills and Experience C#, Vb.Net programmer. Proposed Milestones €200 EUR - Milestone

€200 EUR dalam 7 hari
(17 Ulasan)

Dear Hiring Manager, I am a professional and working on excel for last 10 years. I have worked with macros and formula's to create dashboards, reports and automation. I have read the details of your project and I'm su Lagi

€37 EUR dalam 2 hari
(7 Ulasan)

Hi. I can create auto scripts to scrape websites, auto click, format txt, csv, xls, xlsx, doc, docx, rtf, json, xml, database files as you request. I can start right now Relevant Skills and Experience I am an expert i Lagi

€100 EUR dalam 3 hari
(12 Ulasan)
€155 EUR dalam 3 hari
(0 Ulasan)

A proposal has not yet been provided

€155 EUR dalam 3 hari
(0 Ulasan)
€222 EUR dalam 5 hari
(0 Ulasan)