I have code like this in a module -
Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _...
I have code like this in a module -
Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _...
I've been working on this for hours! I thought this should be easy but was getting more frustrated the more things I tried.
I should have come here sooner. Thx for the help everyone!
Finally GOT IT
I did
Case 1 'Amended
ChkBool = Sheets("Pg1").Amended.Value
If ChkBool = True Then
MyStr = MyStr & "Y"
Else
MyStr = MyStr & "N"
End If
I moved the Dim ChkBool as Boolean out of my function and declared it as a...
I created a
Sub GetAmended(ChkBool As Boolean)
ChkBool = Amended.Value
End Sub
function on the Sheet 1
Now I am calling this from Sheet 4 inside the code
Case 1 'Amended
ChkBool = Sheets("Pg1").GetAmended(ChkBool)
If ChkBool = True Then
MyStr = MyStr &...
I know this is killing me - it should be that simple right???
When I look at properties the name is Amended
When I click on view code it goes to
Private Sub Amended_Click()
unless I am missing another place I believe it is named Amended. I'm still wondering if I need to do Sheets("Sheet...
I was expecting it to be booleean. I have tried Amended.Value = True Amended.Value = 1
Before this line of code it shows Amended = empty
Now I am getting an "Object Required" error hmmmm
I've changed it so many times not sure which line actually compiled.
Having some trouble using a checkbox. Tried both Form Field and Control Tool checkboxes
Code that is giving me trouble is
Case 1 'Amended
If Amended.Value = vbChecked Then
MyStr = MyStr & "Y"
Else
MyStr = MyStr & "N"
End...
Sorry, I was just being stupid....
I thought I would have to walk thru the query printing each one separately. duuuuuhhhhhh
I just linked the report right to the query and it printed all of the items.
I have a form. There is a check box on the form. If we want a one page report printed for this item we click on the check box.
We go thru all of the current items and check this if we want to print this one page report (always the same report but different items). I now want to create a...
Sorry, I never came back to answer this!
This worked!!! I thought I needed that Screenupdating to get the data on the screen to change. in order for the print to work.
Commented out this line. It works FINE!
Thank you SOOO MUCH!
Merry Christmas!
My Form is on one sheet. It has a second sheet with all of the data that needs to be merged into the form.
I use Indirect to pull this data into the form. The Row Index i is what pull the data from the Data Sheet into the Form. So I need to do an update of the screen. So the print call is...
I set up a macro a couple of years ago. We have to print out acct forms once per year and mail them out. This has worked fine for a couple of years. Now this year (not changing any code) it prints the first one and then gets hung up until excel completely crashes.
If I step through the code...
Thank you
I did
Kill "S:\ERETR\Downloads\00 Year-to-date*"
this takes out the Zip and the Copied one after I have done stuff to it.
Thank you again for your help!
can I add another ?? here
What if I want to Delete the zip file folder after I have moved the copy and done what I need to
I want this gone
S:\ERETR\Downloads\00 Year-to-date.xml.zip\00 Year-to-date.xml
Leaving Just
S:\ERETR\Downloads\00 Year-to-date.xml
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.