Search results

I need to reference a nested subform. I have a main form called jobs with a subform called items, that subform has a nested subform called part_items how do you reference this in VBA? Me.items_sub.Form.RecordsetClone - references my subform :) thank you!

Sorry, by the way I am also using Access 2007.

I have a command button linked to a macro set up to do a filter, but I also want the button to do a sort with another macro. How do you set up a sort Macro? Appreciate it :)

same question but with printing to pdf or emailing with pdf attachment in Access 2007 :)

I found an answer "DoCmd.OpenReport "report",,,,"

Ok I think I have a simple question but I am having trouble tracking this answer down myself. If "DoCmd.OpenReport "report",acViewPreview,,," opens a report in print preview, what code do you use to just print the report without the preview "DoCmd.OpenReport "report", acPrint,,,," is not...

doco! you da' man :) I kinda feel bad now to bother you though because I just noticed on the access faq's part of the forum the its right there. I tried to use the forums search to find it but it didn't yield many results, I am not sure whats up with that. THANK YOU!!!! your code and...

This is the error I receive. I had actually tried using ( me.textboxname = "value" ) before. The copy function works awesome I couldn't tell you a lot about how it works because I didn't write it. But I have been using it for some time now. Thank you for your help I attached a screenshot...

The copy part of this code works great but I need to set some fields to a default value after the code has ran. It will be the current record on the form : ) This is part of some VBA code used to copy the record from the current form to a new record. After those 2 functions have ran I want to...

Thank you Bob, I will use that as a last resort, my users hate the idea of shortcuts, they complain so much haha. I have an idea, but I don't know if it is possible either. What if I took the richtext from the memo and minipulated it from VBA? maybe use a find function to locate the <div> and...

I have a purchase order report I built. The management wants me to center the description field on rows that are for description only so they stand out more on the purchase orders. ie. Line Item Description QTY PRICE row 1 |...

I just wanted to know where people go to look when they are checking to see if their domain controller is the primary domain controller, when on the server. We upgraded last weekend to Windows 2003 r2 as the PDC from an old Win2k SBS. :)

Sub Macro1() ' ' Macro1 Macro ' ' Keyboard Shortcut: Ctrl+t ' Dim i As Integer Do i = i + 1 Range("A2:F2").Select Selection.Copy Sheets("Sheet1").Select Range("A" & i).Select ActiveSheet.Paste Sheets("DetailOperDir").Select Range("A3:F3").Select...

ok so i wrote something I think is working haha my excel is going crazy haha i will post what i did so you guys can have a giggle haha a

haha bad attempt number 1 : ) im going to go try again! Sub Macro1() ' ' Macro1 Macro ' copy rows ' ' Keyboard Shortcut: Ctrl+r ' Dim wb As Workbook Dim ws As Worksheet Dim ws2 As Worksheet Dim Rng As Range Dim i As Integer Dim j As Integer Set wb = ThisWorkbook Set ws =...

Sub Macro1() ' ' Macro1 Macro ' copy rows ' ' Keyboard Shortcut: Ctrl+r ' Range("A2:F2").Select Selection.Copy Range("H2").Select ActiveSheet.Paste Range("A3:F3").Select Application.CutCopyMode = False Selection.Copy Range("H3").Select ActiveSheet.Paste...

I might have a more simple idea for a solution. if there is a way to copy and paste the rows into 1 row. example-- cut row 1 and paste to new row 1 cut row 2 append to end of row 1 cut row 3 append to end of row 1 cut row 4 append to end of row 1 cut row 5 append to end of row 1 cut row 6...

haha its running. ! it might take awhile! thats going to save me a bunch of work! gracias!!!!!!!!!!!!!!!!!!!!!!!!! CHERGH

Type mismatch error Sub bleh() Dim wb As Workbook Dim ws As Worksheet Dim i As Integer Set wb = ThisWorkbook Set ws = wb.Worksheets("Sheet1") do while cbool(ws.Cells.Find("Canada", LookIn:=xlValues)) = true 'error type mismatch i = ws.Cells.Find("Canada", LookIn:=xlValues).Row ws.Rows(i &...

Example I will attach an example. :D The list is reallllly long : ) I am learning this as I go. I do not deal with excel very often. thank you