probably the comma, best to format the date as you go, like
strName = format(Sheet2.Range("F1").Value, "yyyymmdd")
Type: Posts; User: westconn1
probably the comma, best to format the date as you go, like
strName = format(Sheet2.Range("F1").Value, "yyyymmdd")
www.vbforums.com/showthread.php?641246-LPCSTR-as-parameter-in-OCX-file-Please-Help!
see if post #9 can help you
not while you are reading the cells, you would have to use variables and assign the cell value to the variables within the loop, that way you could assign specific values to the variables prior to...
afaik you can not do this, no other code will run until the dialog is closed
avoid the use of activesheet, as it is a new workbook, specify as
osheet = owb.sheets(1)
lock the cells and protect the sheet? unprotect to change data and reprotect
try like
Application.Dialogs(wdDialogEditFind).Show
this is virtulization, it works both with protected folders and parts of the registry, as part of UAC (user access control in vista and later)
if the script is not elevated, the virtulization is...
try like
salga = Array("0301/4535/0000", "0550/4535/0000") 'Salga
sec = Array("0301/4213/0000", "0550/4213/0000", "0700/4213/0000")
tarw =...
you can try like this to see if it suits your needs
salga = Array("0301/4535/0000", "0550/4535/0000") 'Salga
sec = Array("0301/4213/0000", "0550/4213/0000", "0700/4213/0000")
...
this is different from running programs elevated, even when logged in as admin
you want to check if one serial number, input by user, is in the array?
personally i would use a windows shell object, this supports copying of folder and content
there are several examples in this forum if you search on shell ftp
files transfered using this method are...
is your script running with elevated permissions?
i would guess, it would need to, hard to do with vba, unless you run excel elevated
you need some variable to keep track if you want the high value or low value for the next email to be sent, try using a static variable like
static lownext as boolean
if...
post a sample of the converted csv
word basic is pretty dated now in favour of VBA, so should be avoided
you should be able to open any compatible document in kingsoft Word, using Shell command, or shellexecute API, passing the...
i doubt that you would want to change the size of the button from within its own click event
put a breakpoint on that line of code to see if it ever runs
it is possible to automate workbooks in another instance of excel, using getobject, but i have never tried iterating through multiple instances
it should be possible to iterate through all running...
so what happened?
wrong result?
error?
nothing?
there is not really a pop up selection box predefined, you can use a msgbox or an inputbox, but neither would allow the user to select from a list of open workbooks
that was why i suggested a...
you could use a listbox to get a list of the open workbooks like
listbox1.clear ' start fresh
for each w in workbooks
if not w.name = thisworkbook.name then listbox1.additem w.name
next...
ok, assuming this is the line you are referring to, try
for each cel in sheets("LR").range ("a:a")
something like
for each cel in sheets("LR")
set fnd = sheets("BH").range("a:a").find(cel)
if not fnd is nothing then
fnd.offset(, 18).value = cel.offset(, 18) ' column p,
...
Sheets("sheet2").Shapes("optionbutton1").Width = 399
change sheet and radio button name to suit, same for height
you would need to compare the found column with the range column like
DiscountColumn = Sheet4.range("ExportHeadings").Find(What:=DiscountString, MatchCase:=False).Column -...
here is the sample i was working with
For Each msg In myFolder.Items
If InStr(msg.Subject, "FW:") > 0 Then Stop: Exit For
Next
Dim m As MailItem
Set m = msg
strt = InStrRev(msg.Body,...
i can easily get the original text and email address from the body, but it does not include all the images, i will have to look at it further for a satisfactory method to get the original appearance...
you want all test1 in same sheet or each test1 in separate sheet?
how to name sheets if the latter as they would all be named test1?
i am sure it is possible, i have not had time to look a the forwarded message item object yet, maybe tonight
i am not sure i understand what is the current problem, is it deleting some attachments you want or not deleting some?
please post the updated complete code, use code tags to make the code more...
i guess the best way is to sort the sheet on the mail id, loop through until the id changes
or filter and send whole sheet
i have no experience with lotus notes, but it would be simple enough to...
look into application.ontime
no, the first may not be available if access is not installed and he indicated it was not an access database, but sql server
i suggest he finds why ADO is not available, if he is using w7 or w8...
the first would require access to be installed and DAO should be avoided with any other database than access, even with access it is better to use ADO now
microsoft activex data objects, any system from win 98 should have available, maybe different in w7 or w8
afaik you do not have to create a DSN, just use the correct connection string, check out...
you should only use the dropdown lists of events on the code pages to make sure the events are properly registered
if the buttons are moved, the events may have also moved to a different codepage
pls use code tags when posting code
this should really be a SUB as it returns nothing to the caller
your problem is not using fully qualified ranges for all range object parameters, avoid...
whilst i would be prepared to open the file i can only open .xls as my version of excel is too old for these new files