I'm no expert with my vba, record a few macros and make alterations to existing code but this is driving me crazy.
I have a simple script which I would like to update all DB links and all Pivot Table information, which my code does but i'm currently having to run it twice before it shows the correct results.
I have an issue on manipulating the data in my worksheet below. I need to update column 'remark' when the customer has pay fully. Example customer 1003 and 1004 both pay completely so I need to update done in column remark. For customer 1002, because not fully pay, so cannot update done.
customer inv no invoice payment remark
1002 A12 100 100
1002 B45 120 0
1003 W12 90 90 done
1004 F12 30 30 done
1004 F17 45 45 done
May I know what function or coding can achieve this?
I'm trying to run a macro that only shows completed projects, which means all elements of a project have been labeled "Completed". See example below; 1868 is the only project I want to see when I run the macro, 1869 and 1870 are fully complete, so I don't want to see them.
Project #Status1868Complete1868Complete1868Complete1869In Process1869Complete1870In Process
I have a worksheet in which I have a worksheet_change macro. This worksheet_change macro makes sure that a few cells will keep their colors, even if the user copies and pastes a new value to that cell. This worksheet_change macro runs each time there is a change on the worksheet. Now my problem is that on the same sheet I have an update list macro which updates around 20.000 rows and two columns (which is alltogether around 40.000 values) and it takes a while to run. So.. it takes a loooooooooot of time (too much) when these two macros both run.
My question is that can I somehow disable the worksheet_change macro while the update list macro runs. I mean something like when I start the update list macro to disable worksheet_change macro and when the update list macro finishes, then reenable worksheet_change macro?
I need to be able to open a workbook named "Cost Price List" and press an update button which will open Another workbook called "Numerical Pricelist" that will then look up the part number of the item and change the corresponding description only, using the "Numerical Pricelist as the correct master document. There are approx 5000 part Numbers but i have cut a small sample section.
View 9 Replies View RelatedI have a worksheet designed to look like a form. That worksheet pulls data from an "Application Data" worksheet using INDEX and MATCH formulas. That part works great. The user enters an Application number on row 8 and it populates all of the other cells. In fact, in cell O7 (not pictured), I have it generating the row number the data came from (based on a MATCH function).
Here's my question--if they go in and change a value in one of the other cells, they should be able to press an "Update" button. That will then kick off a macro that goes to the "Application Data" sheet, finds the row that has the Application Number (from row 8) and updates the values based on what the user entered on this form.
How do I write the statement that selects the row based on the Application Number?
I have been trying to remove or disable the message on update to other worksheet " To update all linked click yes......" I have try the following unsuccessfully
Sub auto_open()
Application.AskToUpdateLinks = False
End Sub
On the menu bar choose Edit ---> Links Can not choose manual, as the option is grey out (disable) I would prefer a vba solution, but I am open to anything to get rid of this message
Workbook contains the following sheets : PIR TrackerChartsSAMPLEFINALValidations
When a change occurs on PIR Tracker, the following occurs:
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
Dim Rng As Range
Set Rng = Intersect(Target, Range("A1:A500"))
[Code] .....
I also want the pivot tables on SAMPLE and FINAL to be updated. What do I need to do?
When clicking on the sorting button of filtered data near the top of a field, I can select different things to show or not show. In a date field, it starts to arrange things by year, which can be expanded to months, which can further expand to show individual days. All well and good.
But many of my dates do not show up in the year categories. They are instead shown below the years as individual dates. Furthermore, sorting the date field in question is imperfect for these dates. Here is an example where some dates from april are jammed inbetween others:
4/2/20124/2/20124/2/20124/2/20124/20/20124/20/20124/20/20124/20/20124/20/2012
...
4/27/20124/27/20124/27/20124/27/20124/3/20124/3/20124/3/2012
These jammed dates are some of the same ones that are orphaned outside the year groupings. All the dates have the same date cell type. No other filters are applied.
I'm working on a project and am particularly new to the whole excel world (especially with macros). Currently, my boss has some data that needs to be refined and organized. Until I get a sense how to have a macro do everything all at once, I plan on have macros do each step more quickly.
Right now, the macros my boss has given me allows the data to be organized into clusters. Each cluster is separated by client IDs in column C. Each cluster is separated by a blank row. We are looking for clients who have not paid their dues and are marking their unpaid dues with colored rows. The dues that are paid are left as white. However, there are clients who do pay their dues, leaving their entire clusters white. I was wondering if there is a macro to remove those fully white clusters.
I am trying to sort a csv file through a VBScript. My problem is that Excel continues to run as a process on script completion. Running multiple variation of this script results in multiple instances of Excel being present in the WinXP Process Manager.
Set xlObj = CreateObject("Excel.Application")
xlObj.Visible = false
xlObj.Workbooks.Open "C:Test.csv"
xlObj.ActiveWorkbook.ActiveSheet.Range("A1").Sort xlObj.ActiveWorkbook.ActiveSheet.Range("A1"),,,,,,,0
xlObj.ActiveWorkBook.Save
xlObj.ActiveWorkBook.Close true
xlObj.quit
set xlObj = Nothing
As a second part to my question, is there any way to modify the code to allow multiple field sorts, i.e., A1 is Primary, C1 is secondary?
I have a workbook which when opened connects to an external datasource (excel file) and downloads a table of information. While this is happening I have a userform which shows which has a lable saying (connecting to datasource, please wait....). However, when I open the workbook, the userform shows but the labels do not show, the userform just appears white.
View 4 Replies View RelatedRecently I come across a file with only 1 sheet, in which is a table only occupied an array of A1:Q49. In Normal View I can see the row / column header of A-Q and 1-49 as usual, but nothing outside that range (only grey colour). Also, the empty cells outside A1:Q49 are all grey too. How can I do that?
View 2 Replies View RelatedI have two lists and wish to compare them to identify duplicate values. I have used Duplicate Values in Conditional formatting but cannot find a way of ensuring an exact match. For example one list has the value 4150 and the other list has other values like 5641509 and 341508, both of which contain the string 4150 but are clearly not the same value. However, the conditional formatting is picking these up as duplicate values.
View 6 Replies View RelatedI'm trying to calculate the number of rows in a matrix that have a complete row of data. I would noprmally do this using nested if formuals and a count function, but the columns of the matrix are filterable so the count won't work.
Is there a combination of functions that will adapt as I filter data?
When you open a sheet, and it brings up the message "this workbook includes links to....etc" & asks you if you'd like to update... is there an event i can use to run some code before the user clicks 'update' ?
View 9 Replies View RelatedI've written a worksheet to countdown to a specified time - however, unless a cell value is changed or a manual calculation (F9) is forced then the current time does not update.
how I could get my clock to tick?
I have this issue, I am trying to create a spreadsheet which updates one (Database) based on another (Sheet1), then log's the changes on a third sheet (log), I keep getting the error 1004 message, but I can't see what is wrong with my code here it is, and file is attached also:
Option Explicit
'Update Database
Private Sub CommandButton2_Click()
Dim fincom As Variant, subcat As Variant, fixture As Variant, space As Variant
Dim i As Integer, x As Integer, postSpace As Variant, change As Variant
Dim store As Variant, k As Variant, log As Boolean, Target As Range, OPostSpace As Variant
Application. ScreenUpdating = False
'On Error Resume Next
fincom = Worksheets("Database").Range("B2:B8").Value
subcat = Worksheets("Database").Range("C2:C8").Value
fixture = Worksheets("Database").Range("D2:D8").Value
postSpace = Worksheets("Database").Range("E2:E8").Value
OPostSpace = Worksheets("Sheet1").Range("G4:G8").Value
store = Worksheets("Database").Range("A2:A8").Value.....................
I have one source spreadsheet, where are columns NAME, DATE. I read these data by ADO to other spreadsheet, where I can change/delete data and then run macro for update data in source spreadsheet. The problem: In source spreadsheet is column "NAME" and column "DATE", with values e.g. "Joseph"; 1.1.1980. I read this data to other spreadsheet, then I delete in it value 1.1.1980. When I run macro Update, it messages error.
Sub UpdateItem
...
.Fields.Item(1).value = activecell 'activecell value = "Joseph"
If Not isempty(activecell.offset(0,1)) Then
.Fields.Item(2).value = activecell.offset(0,1).value
Else
.Fields.Item(2).value = "" 'I tried Empty and 0 too but when I read data again then, it displays 0.1.1900, nothing works
End If
...
End Sub
It seems that in source spreadsheet has data in column "Date" format Date and when I try to update data in format String ("") in source spreadsheet by Update macro, it messages error. When I used
.Fields.Item(2).Value = Empty
' or
.Fields.Item(2).Value = 0
after rereading data it displays 0.1.1900 What I want to get is that if the cell with date (in other spreadsheet) is empty, the cell in column Date in source spreadsheet after updating will be blank (contains no values).
I have a master employee worksheet with about 20 columns (name, position, salary, seniority, etc.) and over 1000 rows (all the employees). From this I created a second worksheet to calculate year-end bonuses.
Now, I need to check my bonus worksheet against any changes which have been inputed into the master worksheet such as changes to an employee's salary, position, etc. How do I do this? Do I need to create a third worksheet or use Vlookup in the bonus worksheet?
Is it possible to update open worksheet which would stay open from different computer without doing anything to it.
View 8 Replies View Relatedhow to update a function when opening worksheet. I made
View 4 Replies View RelatedI have the below vba and would like to have the '''event calculated ''' on any event on the worksheet. Right now it only update if updating the val1 thru val6 cells. How can i get the worksheet to update on any event or change on the sheet?
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
fr = Range("a65536").End(xlUp).Row
Set Rng = Range("a2" & ":n" & fr)
If Intersect(Target, Rng) Is Nothing Then Exit Sub
[Code] .......
I have code that links my existing workbook to a closed workbook. It works as planned but it goes to far. In my first workbook, the one containing the code, I may have up to 30 worksheets. If I am on Sheet5 I may need to run the vba code to update cells X:X only on Sheet5 but instead it updates cells X:X on all Sheets in the workbook. How can I keep this from happening?
I have asked this on another forum but it seems to be a difficult thing, perhaps impossible thing to keep from happening.
I need to have all the information in one workbook for all 100 employees and still provide an individual report for each user and an overall report. In the attachment is a "Summary" and "Calendar" sheet these are the original individual files. summary contains personal information and the "calendar" tracks absence and holiday and the totals returned to the Summary sheet. I think what I need is a Master worksheet that has all the information in for each employee pre row and to have a "calendar" input/change/ call worksheet sheet to call an individual detail, this would also update the master worksheet with any changes.
View 4 Replies View RelatedA long time i have not been practising VBA so i am looking for a little refreshment. I am having a workbook with a random number of worksheet with different name that the user can define as he wants. My calculation option is set-up on automatic so each time i make a change all my formulas are updated. However i want the user to be able to disable the calculation of a specific worksheet that he would chose throught a list. Basically the calculation will remain automatic but the selected worksheet will not be updated when a change occur.
View 2 Replies View RelatedI have 2 worksheets in a workbook: "Orders" and "History". Both sheets contain the exact same columns. The "Orders" page data gets wiped clean at the start of each month. What I'm looking for is a macro solution that will copy any new rows and update any old ones that have changed on the "Orders" page to the "History" page, so we can keep a running history of sales. Ideally, I'd like the macro to fire only when performing a Workbook Save or Workbook Save As.
"History" is in date order, so adding new entries from "Orders" should be easy, just by adding rows to the bottom. Updating existing rows will be harder, because I want it to update if the row has changed but not be deleted or changed when the "Orders" sheet is wiped clean the 1st of the month.
Additional:
The columns in both sheets are:
Order Date
Ship Date
Order Number
Customer
Item
Qty
Amount
Because each item gets a seperate line, there will be rows that have identical Order Date, Ship Date, Order Number, and Customer entries, so I suspect I will need to compare multiple columns when deciding if one has changed (the only column that *should* change after initial entry on the orders page is the Ship Date, which would initially be left blank when the order is first entered).
I am writing code that when you click "OK" on the userform the macro should copy the user entered values which are already in a worksheet into another worksheet. Once the values have been copied over I would like the form to clear the values.
The code that I have so far is giving me a Method " Range" of object'_Global' failed error.
Sub UpdateVariables()
Dim HomeAddress
Dim CellAddress
Sheets("UserInput").Select
If Range("E1") = 0 Then Exit Sub
For Each Cell In Range ("E4:E496")
Cell.Activate
If ActiveCell.Value = 1 Then
HomeAddress = ActiveCell.Address
CellAddress = Variables & "!" & ActiveCell.Offset(0,1).Value
Range(CellAddress).Value = ActiveCell.Offset(0,-1).Value
Range(HomeAddress).Select
End If
Next Cell
End Sub
I have a table that includes list of clients, products they order, and requested delivery date. When the client calls in to place an order, I pull up the excel table (orders worksheet) and fill in the items quantities and the required delivery date for the client who called. Once I fill the information for the client who called in, I need to update a "log" worksheet with the information that I just entered. The log worksheet will eventually contains history of all the orders which I received in the past.
View 1 Replies View RelatedI have code in my Worksheet_SelectionChange.
However it will not update until I physically click on any cell within the U33 to U38 range.
How do I tell Excel that I physically clicked on any of these cells? I have tried Activate..., blank and re-populate, select cell, select range... In VBA it does not think it is being clicked on.. it is just doing the code... when done I have to again manually/physically click on it.