Search:

can you post a sample workbook (zip first) to demonstrate your desired result?

what is webbrowser0? a webbrowser control? have you navigated to some website for it to contain a document?
what is the parameter functionname? as it does not appear to be used

i am thinking on this, will post when i get something

i realized that, but if someone has a error handler that can return line numbers etc i would have thought this thread would have been redundant, hence my question

@ OP
while it is easy to know...

this sub will use the function above, or it could all be incorporated together

Sub doall()
rw = 2
Do
If IsEmpty(Cells(rw, 3)) Then Exit Do
Cells(rw, 1) = getnextword(Cells(rw, 3))
...

so in vb6 they may be designers rather than forms, so while userform1.show (or whatever name) will load and show the userform it will not be a member of the forms collection, so code to loop through...

i think he wants the called exe to feed back some data to his caller

is this vb6? i have never seen a line number with that error

in this case a static would not be suitable

that is what it is supposed to do, it worked with a sample i tried, i will look at it further

of course with vba it would be much simpler to code but not as efficient as using in-built functions...

you could avoid using a global by using a static within the activate event
on first run change the static, then never run again, with out reloading the form

not quite, in this macro all ranges on label sheet are fully qualified, sheet object.range, but ranges on data sheet are not qualified so just refer to the current activesheet, this is sort of unsafe...

looking at your example as best as i can see, your line 2 does not follow the requirement

you can copy this formula into c2 and drag it down the column as far as you need
=MID(C2,FIND("contractor...

i have not yet found the issue, but i would recommend that all unqualified ranges (which would refer to sheet data) should be fully qualified to a sheet object

set shdata = sheets("data")or...

yes i am using those


here is the code, pretty basic

Set objmessage = CreateObject("CDO.Message")
objmessage.Subject = "Example CDO Message"
objmessage.From = fr
...

the code i wrote around 10 years ago, before i started editing to use with windows 10
i have never used gmail server to send outgoing emails i only ever had this code for testing purposes, sending...

after a couple of changes to code, i now have the gmail server accepting cdo emails in windows 10, i will test with xp later

BUT i was initially locked out by gmail and had to set use less secure...

there was a thread here about a year ago, i will see if i can find it for you,...

in my case i have my own mail server for incoming mail, but security and other issues deter me from having a smtp server on the same box

i either use my isp outgoing mail server, which may have...

this code is copied from a recent thread, where the poster was accessing multiple inboxes, but all mailboxes are still within the same namespace, so i believe there would only be one collection of...

i was using cdo from xp sp3 until recently, when i upgraded the last of the computers here, too many issues with xp to continue
i had modified the code for the program to run on windows 10

have...

you do not provide enough information to readily provide a solution

the issue may not be the age of the code or any external changes to smtp, but a change of operating system, which you do not...

there is 2 choices to work with a workbook that is not currently open, OPENan existing workbook, specifying the full path and filename, or ADDto open a new blank workbook

if you say so!!
you...

because between post #7 an post #8 you changed the line Set b = Workbooks.Add

of course it would you do not specify which workbook contains that sheet, if it is in the new workbook there is no...

you have missed the line

b.saveas myfile
looks like you should have a \ between mypath and the file name

to specify the sheet FM, you need to change the name of the default sheet in the new...

you do not mention how marty is prioritized with other staff when allocating shifts, or how many staff per shift per cafeteria

insert constants are different from paste constants
xlshiftdown should b the constant used, but for an entire row insert it is irrelevant as an entirerow can only go down

i had done a simple test...

i am not sure that -4122 is a correct value for a valid constant
other than that it appears to work as desired, though it also copies any cell values as well as formatting

isn't that what the other macro did with out emailing the workbook? just change the path and filename and remove the emailing part

shellexecute with runas

so you want an additional copy of the same workbook in another folder?


b.SaveAs myfile
b.saveas "W:\.Team Documents\Freehold Team\Freehold Managers\Reporting\FM Report builder.xlsx"
where the...

to change the file name you need to edit this line
but i am still not sure what result you want the code should create a file named
FEB PM Template.xlsx please specify the exact file name you want...

as a test, i would try clearing the value of text for each iteration

several of the worksheet functions do not work with non contiguous ranges

a workaound is to copy the non contiguous range to a temporary worksheet then perform the countif on the usedrange of that...

as you have not told us what the actual file name being saved it is a bit hard to know the solution, but it may be

myfile = mypath & "\" & Format(Date, "MMM") & " PM Template.xlsx"or do you just...

thank you for sharing, but
invalid attachment

you can try like
Set Application.ActiveExplorer.CurrentFolder = myfolder

if you want to keep .csv then enclose fields that could contain commas in quotes
if you decide to use some other field separator, then the file is no longer .csv (comma separated values)

use a timer control to update the label every second

i would believe the only way you can do this is to write a vba sub in some module (or add a module) in the same workbook (can all be done in code), to hide the userform, then run the sub from vb6...