Updating column totals in sub forms

Visual Basic for Applications (VBA)

‹ Microsoft ISV
- Archive
  - VB
  - Windows Forms
  - Windows Vista
  - SQL Server
  - Architecture
  - IE
  - ISV
  - Visual C#
  - VS Express
  - Dotnet
  - Office
  - Smart Device
  - VS 2008
  - SharePoint
  - Visual Studio
  - Game
  - Windows Live
  - VFP
  - VC++

- Previous
  - 1
    - AutoExec will not execute properly Hello there I have an .dot file in the Word 2003 start-folder. When opening word, the file is read. The autoexec-macro should make a new entry with a number of commands and subcommands in the standard menubar. On about 300 PC's this works fine. On a few ones only part of the commands appear. All PC's run W2000 and Office 2003. Any idea regards Jurgen Tag: Updating column totals in sub forms
  - 2
    - Determine if and where the .NET Framework is installed using VBA vtortola , I mean if you will use your code in other computer, it don't work if Sistem was set on disk E:\ or D:\ And I finished and tested my function. It "determine if the .NET Framework is installed as well as the path to that install" Tag: Updating column totals in sub forms
  - 3
    - Pivot Table Macro Hi, I have set up a small macro to create a pivot table from a spreadsheet: Sub CreatePivot() ' ' CreatePivot Macro ' Macro recorded 3/14/2007 by Gary ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _ "Data!R1C1:R656C90").CreatePivotTable TableDestination:="", TableName:= _ "PivotTable1", DefaultVersion:=xlPivotTableVersion10 ActiveSheet.PivotTableWizard TableDestination:=ActiveSheet.Cells(3, 1) ActiveSheet.Cells(3, 1).Select Sheets("Sheet1").Select Sheets("Sheet1").Name = "Pivot" End Sub The problem is that each spreadsheet I run it on, has a different number of rows. They all have the same number of columns (A-CL), but the number of rows varies. I'd like the pivot to work no matter how many rows it is: i.e., that it will automatically select the entire range whatever it is. Is this doable Thank you, Gary Tag: Updating column totals in sub forms
  - 4
    - how can I count # of columns between two specific columns? Hello, How can I count # of columns between two specific columns such like, how many columns between column A and column D Thanks so much! B.regards/Yaping Tag: Updating column totals in sub forms
  - 5
    - Why the do while loop does not work? Hello, Below is my code, the lastrowGSVGrowthRate is 101, I expected result is to copy all the "AFFILIATE" items. While with my code, it only copied the first "AFFILIATE" item. I do not know where I did wrong. Thanks so much! B.regards/Yaping raffiliate = 1 rowaffiliate = 1 Do While raffiliate <= lastrowGSVGrowthRate If cells(raffiliate, 1) = "AFFILIATE" Then MsgBox raffiliate Range(cells(raffiliate, 1), cells(raffiliate, lastcolumnGSVGrowthRate)).Select Selection.Copy worksheets("AFFILIATE").Activate ActiveSheet.cells(rowaffiliate, 1).Select Selection.PasteSpecial Paste:=xlPasteAll rowaffiliate = rowaffiliate + 1 Else End If raffiliate = raffiliate + 1 Loop Tag: Updating column totals in sub forms
  - 6
    - VBA and automated word generation Hi there, I am currently working on a VBA application. There is an automated word generation available in the appliacation that serves the reporting process. If there is any Flash add-in being installed in the user's machine (can be viewed through Tools->Templates and Add-ins in MS Word) ,the applicaiton crashes down when the user tries to generate the report because the flash add-in runs initially before the word gets opened. Is there any work around available other than removing the add-in for the application to run successfully Your help is greatly appreciated Tag: Updating column totals in sub forms
  - 7
    - Using Excel files in MS Works Had Office and XP on my previous computer and created several Excel files I want/need to keep New computer has Vista and MS WORKS installed - will I have a problem with transferring the Excel files to new computer If so, how do I remedy Tag: Updating column totals in sub forms
  - 8
    - iexplore.exe - Application Error Hi Bennett, How did you remove the yahoo tool bar I have the same error message. Thanks, Eric Tag: Updating column totals in sub forms
  - 9
    - error with wscript.shell error 80070483 hi, i am trying to run a vb script from a VBA module in excel. fn = "test.vbs Set wshShell = CreateObject("Wscript.Shell") wshShell.Run (fn) in the line wshShell.Run (fn) i obtain an error error 80070483 method Run of object IWshShell3 failed it is the first time i do this, so i am not shure if i need to have done something before, some references in windows extension .vbs is not related to any application (is it ok ) tks in advance Tag: Updating column totals in sub forms
  - 10
    - Obtain Unique Work Units via SQL Just Add: GROUP BY WorkUnitsFaultsMainTBL.WorkUnit HAVING COUNT(WorkUnitsFaultsMainTBL.WorkUnit) = 1 Adamus Tag: Updating column totals in sub forms
  - 11
    - Adding Menu to Microsoft project 2007 using VBA How can I add a custom menu using VBA code. There are some changes happened in from Microsoft Project 2003 to Microsoft Project 2007. How can I add custom menu to microsoft project 2007 and make it work to invoke appropriate code. Are there any whitepaper which talks about the changes in the coding from Microsoft project 2003 to 2007. I am new to this area of coding with little knowledge of VBA. ANy help will be highly appreciated. A sample code will work wonders for me. Tag: Updating column totals in sub forms
  - 12
    - compile error: invalid quaifier Hi! I'm a portuguese school teacher that uses vb 6.0. The error mentioned occurs here **: Public Sub introduz() i = 0 Do While i <= 20 VF.Nr(i) = Val(InputBox("Introduza o numero de cliente", "Numero de cliente")) ** VF.NomeCliente(i) = InputBox("Introduza o nome do cliente", "Nome do cliente") If VF.NomeCliente(i) = ("XYZ") Then Exit Do End If VF.Dt(i) = InputBox("Introduza a Data da Factura", "Data da Factura") i = i + i Loop End Sub That's an array defined with public statement that uses an type structure also defined with public statement. Can anyone help me My students say thanks!! Tag: Updating column totals in sub forms
  - 13
    - Collection Item: Parent / NextItem Hi, I am struggling with classes. This is what I want to do, in VBA (test it in Excel please): I want to add a property/function to my class, named NextItem and PreviousItem. These return the next and previous items in the collection. I have several separate collections where I keep my items in. So if I want to determine the next and previous item, I need to figure out in which collection the item resides before I can start to loop through that collection. Unfortunately there is no collection.item.parent. That is what I need to simulate I thought about adding a property ParentCollection to the class, but how can I use that property as a pointer to a collection and retrieve the collection from that pointer. Help! Tag: Updating column totals in sub forms
  - 14
    - VBA Language Definition Hi, just a quick question Does there exist anywhere a formal definition of the VBA language It would be really useful for my dissertation as i am writing a program that interprets macros so could do with something that would tell me, for example all the different ways that variables can be defined, or all the different types of statement that can be used etc. Any advice is much appreciated Ryan Tag: Updating column totals in sub forms
  - 15
    - Are these valid bucket ids ? Hi Jason, Thanks for all the information regarding eventtype. Could I have some explaination for change in behavior of report with the change in WER_SUBMIT_QUEUE / WER_SUBMIT_NO_QUEUE flag (see the post above) Thanking you again........ Regards, Samir Tag: Updating column totals in sub forms
  - 16
    - VBA 6.5 New Version? I have loaded Office 2007 and the VBA about screen states version 6.5. Is there any documentation on recent changes to the VBA environment An older product which includes the VBA environment is not able to launch any VBA macros with Office 2007 installed. The upgrade to VBA 6.5 may be the problem and I would like to find some detailed information on new releases. Thank you, Greg Tag: Updating column totals in sub forms
- Next
  - 1
    - AutoExec will not execute properly Hello there I have an .dot file in the Word 2003 start-folder. When opening word, the file is read. The autoexec-macro should make a new entry with a number of commands and subcommands in the standard menubar. On about 300 PC's this works fine. On a few ones only part of the commands appear. All PC's run W2000 and Office 2003. Any idea regards Jurgen Tag: Updating column totals in sub forms
  - 2
    - MS Office document and image writer print driver I am having a similar problem... I am missing the Microsoft Document Image Wrinter Port: But I have the driver. Anyone know how to re-install the port Thanks! Jeremy Tag: Updating column totals in sub forms
  - 3
    - Fill word document with fields from Access form programmatically Hi - i have a form called 'formpo' that allows users to enter information that we use for purchase orders such as date, order value, supplier name, purchase description, etc etc. when the user has filled in the information on the form i would like them to be able to click a button on the form screen that will take the values from the form and insert them into a specific word document, and have the values entered into a specific place on the word template. There is a lot of stuff out there but its not the best and its mainly about mailmerging it which i dont want to have to do because its a right pain in the proverbial behind. Has anyone done this before Many thanks, Rhys. Tag: Updating column totals in sub forms
  - 4
    - Projects, objects & modules Does the line of code appear on 1 line or 2 This will error MsgBox " Thisdocument is " & ThisDocument.Name This should work MsgBox " Thisdocument is " & ThisDocument.Name Tag: Updating column totals in sub forms
  - 5
    - VBA read a value and not a formula Dear All, I have a question, I want to sum some values if a reference is equal to a date that I implemented in a cell that I defined as name (defined as string) name changes in a loop. I used the following formula ActiveCell.FormulaR1C1 = "=SUMIF(R[-2]C10:R[-2]C100 ,"" = name"", RC[7]:RC[84])" unfortunatelly it does not take the VALUE of the name variable but it writes it as =name. how can I force in my program that the value will be taken into account and not the formula which is behind thank you in advance Pompoire Tag: Updating column totals in sub forms
  - 6
    - ReportFault() vs. WerReportCreate/WerReportSubmit() on Vista For sample code and details about my findings on how ReportFault() on Vista behaves, check out my blog entry at http://www.clausbrod.de/Blog/DefinePrivatePublic20070616 Hope this clarifies some of my earlier notes on ReportFault(). Cheers, Claus Tag: Updating column totals in sub forms
  - 7
    - CurrentRegion Property to Specify SourceData in PivotCache Method I'm fairly new to writing VBA macros to create pivot tables in Excel, and I could use some help. I would like the macro I am writing to be able to use the Currentregion property in order to specify the SourceData for the PivotCache method, where the source data is located on a sheet named "macro". Any feedback warmly appreciated. Tag: Updating column totals in sub forms
  - 8
    - Passing Function As Argument I dunno if it's possible, but I'd like to pass a function name as an argument to a function. The idea is to use the result of the function to do some calculations, no matter what the function is. It would be like this: Function Find_Zeros( Function_Name As Function, Value_X As Double, etc) Thanks in advance. Tag: Updating column totals in sub forms
  - 9
    - Right-click menu icon Hi there, Can you tell me how to add an icon next to a custom right-click menu item Like the little scissors next to the "Cut" item, I would like to place an image next to my custom menu item. Any help would be great. Thanks. Tag: Updating column totals in sub forms
  - 10
    - Runtime Error '2001' Hi Zac, I had hoped to get our internal support team to assist you with this question, but the official support for Access 2002 has reached the end of its lifecycle. My recommendation is to connect with Access users and experts in one of the Access newsgroups. Here's a link to the general newsgroup, but there are others listed in the Access Database menu in the left column. http://www.microsoft.com/office/community/en-us/default.mspx dg=microsoft.public.access&lang=en&cr=US I'm sorry that I couldn't help you with this. -brenda (ISV Buddy Team) Tag: Updating column totals in sub forms
  - 11
    - Search (e.g. Windows Desktop Search) for specific words in VBA code Tag: Updating column totals in sub forms
  - 12
    - Are these valid bucket ids ? Hi Jason, Thanks for all the information regarding eventtype. Could I have some explaination for change in behavior of report with the change in WER_SUBMIT_QUEUE / WER_SUBMIT_NO_QUEUE flag (see the post above) Thanking you again........ Regards, Samir Tag: Updating column totals in sub forms
  - 13
    - Cut A Variable Row from 1 Sheet and Paste to the End of Another Sheet with a condition to meet I wanted to Cut rows that has a status of "High" from sheet B and paste it to the end of sheet A. Sheet A and B will be ever growing list of items. Here's the code that I would like to share. I'm sure a lot more people who would like to create a VBA for Action Database will require this. Sub CopyHigh() Dim HighLastRow, iLastRow As Integer HighLastRow = Worksheets("A").Cells(Rows.Count, "F").End(xlUp).Row With Worksheets("B") iLastRow = .Cells(.Rows.Count, "F").End(xlUp).Row For i = iLastRow To 1 Step -1 If .Cells(i, "F").Value = "High" Then .Rows(i).Cut Destination:=Worksheets("A").Rows(HighLastRow + 1) .Rows(i).Delete HighLastRow = HighLastRow + 1 End If Next i End With End Sub Tag: Updating column totals in sub forms
  - 14
    - Now Button Hi I'm new to coding macros and am wondering if anyone knows how I can create a button that jumps to today's date on a spreadsheet I have a long column of different dates and would like to make it easier for anyone who accesses the worksheet to go straight to today's date... I've been trying to use several combinations of the code "Range(Now).Select" but have yet to succeed.. Help with this would be much appreciated! Cheers Tag: Updating column totals in sub forms
  - 15
    - Access Mail Merged fields ( Values) in side the Macro as a variable. Hi, I want to utilize the partial printing functionality of the word document. e.g. There is 40 page document out of these user may want to print only 10-20 pages. This page range info will be passed to document through mail merge data. ( Data Source is from SAP-ABAP). Depending upon values in this data I want to execute a 'Print1' macro with the variables. Sub Print1() ActiveDocument.ActiveWindow.PrintOut _ Range:=wdPrintFromTo, From:="1", To:="3" End Sub In above code I want the values for "From" and "To" to be from the mail merged data. Please help me on this as i am very new to all this stuff!!! Thank you, Vinod Doshi. Tag: Updating column totals in sub forms
  - 16
    - VBA Merge question Hi (my English is not very good but i'll try it). When I link the datasource to the document, appears a dialog to select the text encoding. The Document.Open method has a parameter to specify the Encoding, but MailMerge.OpenDataSource does not include it. Is there any way to not appear that dialog Thanks, Janfry Tag: Updating column totals in sub forms

ProfSchiavo

This has to be simpler than I'm making it! Trying to maintain column ototals ni SubForm, and update them to the MainForm.

Typical Northwind-type Orders-&-Details relationship: I extend row totals in the OrderDetails subform; and show OrderTotal (column total) in the SubForm's FormFooter. So far, so good. But when I change a quantity or price in the subform, I'd expect the subtotal to change automatically, no It does not; and I don't know whether I need to code a "Change" event myself, to modify that total whenever a single cell changes; and whether I must loop through the rows, or if there's a nifty group-operator in Access to do the columnTotal for me.

(I'm a VB programmer, reluctantly roped into writing an Access form.)

Finally, when I leave the Main Record (i.e., parent of the rows in the subForm), I want to store the updated suptotals in the Main/Parent record. (I know, I know, it's not kosher, but they pay me to do this stuff. -- Besides, it records what has been billed as it was billed; not as it's been updated since.)

Many thanks, anyone who can provide a cogent reply.

S