VBA Coding - Macro Moving Data With Multiple Variables?

Jul 17, 2013

I'm working on a complex spreadsheet and I'm working on a complex spreadsheet system for pulling and measuring data. My VB programming skills are about minimal/average, so you may see me on here asking various questions . In any case, what I'm trying to do is create isolation macros for "Kickback" data (erroneous). I'm trying to remove data with certain criteria and isolate it on a separate "kickback" sheet for one for taking a second look at. I've made the easy macro of creating a new spreadsheet:

Sub Create_Kicbacks_Sheet()
' Create_Kicbacks_Sheet Macro
' Creates "Kickbacks" sheet for invalid information.
Sheets.Add After:=Sheets(Sheets.Count)
Sheets("Sheet4").Select
Sheets("Sheet4").Name = "Kickbacks"
Sheets("Kickbacks").Select
End Sub

This coding works correctly. The problem area I'm finding is the sorting data. My goal is to look at Columns A and B for certain criteria and either leave it alone, move it to the "Kickbacks" sheet or delete (due to not being necessary in data calculations). Basically, here's a synopsis of what I'm looking for:

if Column A = Y and Column B = Mandatory -> Leave Alone
if Column A = Y and Column B = Best Efforts -> Move Row to Kickbacks
if Column A = Y and Column B = Empty Cell -> Move Row to Kickbacks
if Column A = Empty Cell and Column B = Mandatory -> Move Row to Kickbacks
if Column A = Empty Cell and Column B = Best Efforts -> Delete Row

Here's the code I have in excel (modified from one I found online)... Which only is doing some of what I want it to do:

Sub Moveto_Kickbacks()
Dim r As Range, LR As Long
With Sheets("Data")
LR = .Range("A" & Rows.Count).End(xlUp).Row
Set r = .Range("A2").Resize(LR - 1)
.Range("A1").AutoFilter field:=1, Criteria1:=""
.Range("B1").AutoFilter field:=2, Criteria1:="Mandatory"

[code]....

View 2 Replies


ADVERTISEMENT

VBA Macro To Create Multiple Data Validation Lists From Variables & Named Ranges

Nov 10, 2008

I cant seem to find the correct syntax for creating 14 validation lists using array members as the source of the named ranged. The validation lists are stored on a different worksheet, the Named Ranges are created fine, as are the ranges that are having the validation applied. The Syntax I am having a problem with is

Public Sub assignDVList(WSD As Worksheet, sListName As String)
Dim DVListName As String
DVListName = "DV" & sListName
Application.Goto Reference:=sListName
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=" & DVListName

It is the Formula1:="=" & DVListName that is creating the headache. The sub is called as the array moves through the columns, using the header row as the Name for the Named Range, and the data Validation worksheet uses the same naming except it has DV in front.

View 4 Replies View Related

Moving Rows Into Multiple Spreadsheet Using Macro

Jan 20, 2008

Is it possible to move rows of data in a spreadsheet to multiple spreadsheet accordingly?
I had lists of tasks in a single spreadsheet and i need to segregate the tasks for all my staff in serial while no duplication among all of them. For instance, i got 4 personals in my department and i need the 1st 4 tasks to be distribute to each of them and next 4 tasks accordingly. This is due to all tasks are equip with due date and i need to calculate how much time i need to accomplishing them. i'm used to manually move it and found it time consuming, so i was wondering if someone would instruct me where or how to achieve it by using a simple macro.

View 9 Replies View Related

Moving Data From Multiple Rows To A Single One

Jun 29, 2014

Any macro capable of moving data from multiple row to a single one i have attach a sample file before and after ...

View 4 Replies View Related

Moving Data From Single To Multiple Columns And Merging?

Dec 16, 2012

Current Data:
File 1:

Each set of data is listed in either two or three rows

Eg.,
ID
Date
Filename

ID
Date

ID
Date
Filename

The goal is to move them to separate columns (rows can be 3 or 2 for each data set, and may or may not be separated by space/additional row)

File 2:

Has a common field 'ID' as that of File1, does not have Date, and Filename, but has a new field 'Detail' (already in the expected format)

Eg.

ID Detail

The goal is to merge properly formatted data from File 1 to File 2

Eg

ID Date Filename Detail

View 14 Replies View Related

Moving Data From Multiple Columns To Single Column

Mar 28, 2012

in moving data from multiple columns to a single column. I have attached a sample image from an excel file which details the requirement. The first column contains a qualifier, that should remain constant when the data from columns B to the end move to a single column "B". The number of columns for each row is different, however, there is a maximum number, say 25. As mentioned in the image, when the data from columns B to the end is moved in to column B, column A is retained fixed, to the original value, and the original data below it is pushed below. Any pointers to how this can be achieved by VBA or without VBA?

View 6 Replies View Related

Macro For Moving Data

Sep 1, 2007

I need to move a lot of data from what was originally a txt document into an easily readable form.

I have used Macro's before but only for very basic routines (so please treat me as a bit dumb when it comes to Macro’s).

I have Include Screen shot of the data highlighted in a colored box and the relevant colored cell I need to move it into.

This needs to be repeated many times with data that is consistent in its layout.

View 12 Replies View Related

Moving Data Cells From Multiple Columns To Single Column

Nov 14, 2011

I'm trying to work out how to take all cells with data from multiple columns and stack them in a single column.

Here's the history...

I have multiple part numbers in single cells in column A. I perform a text-to-columns function. The resulting part numbers spread across multiple columns (say, B through K). Now I need to get all the part numbers, in their own cells, stacked in column A for one continuous list of single cell part numbers.

Is there a VBA option for cutting only the data cells from Column B-K and pasting the data at the bottom of column A while avioding blank cells?

View 4 Replies View Related

Moving Data On Closing Using Macro

Jul 9, 2012

I am looking to take the information from a selected cell in workbook a, and on closing the spreadsheet - moving that piece of data and adding it to the bottom of a list in column d of workbook b....

View 2 Replies View Related

Coding Multiple Cases In VBA

Mar 24, 2009

I am writing VBA code to do the following:
IF A1 > 50 then print array C1:E7

I have this code and it works.

View 14 Replies View Related

Macro Coding: Add A Code To The Sort And Paste Macro That Will Open The Second Spread Sheet

Jul 21, 2007

I am making a spreadsheet that sorts and pastes, but I need to know if I can add a code to the Sort and Paste Macro that will open the second spread sheet needed without just already having it open and using the

Windows("estimate sheet one.xls").Activate

View 2 Replies View Related

Single Coding Line Into Multiple Using Underscore

Feb 10, 2010

Single coding line into multiple using underscore
How can i break this up

View 3 Replies View Related

Coding A Userform To Create Multiple Entries

Mar 18, 2008

I've been trying to code this user form so that when the appropriate command button is pushed, the Inventory Number is populated the amount of times indicated by the "multiplier" number.

I haven't gotten very far successfully. Mostly runtime errors.

Here is a screen shot of my table, along with my non working code.

Private Sub cmdfront_Click()
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("Scanned")

View 9 Replies View Related

Coding A Macro In VBA

Apr 3, 2008

Is there a way of coding a macro in VBA that allows you, with one macro, to enter text in one cell and at the same time enter a value to the cell on it's right?

I don't want to name the cells, but I wondered if you could add to the code a piece of code that basically said "Select the cell to this cell's right and add the value x".

View 9 Replies View Related

Macro - Color Coding

Jun 13, 2007

I am trying to figure out how to run a macro for 1 particular workbook in an excel spreadsheet. I don't want it run on any of the other workbooks in that file, just the 1. I can't use conditional formatting because I need more than 3 values (if statements).

This is what one example of data in a cell and below is the color I'd like it to turn when I run the macro:

T: 6/1/07
A: 6/8/07

Anything that has a A: (which means an actual date it happened) I'd like the cell to turn blue. If there is an RT: (which means revised target) I'd like the cell to turn red which means it missed it's target date, and has been revised. If it has a TBD I'd like the cell to turn pink (or yellow or any color really). All other cells are just white. I don't know where to find the color codes in excel as well. Other samples of what cells look like are below.

Here is another example:

T: TBD

And final example:

T: 6/4/07
RT: 6/15/07

View 9 Replies View Related

How To Change Coding In Macro For Pivot

May 9, 2014

I'm trying to run a pivot in Macro where the Pivot needs to choose the whole sheet and not a specific range as the data pasted in the sheet may fall in different range or rows however the columns are stable.,

Below given is the coding for that Macro Recording for Pivot.

[Code] .......

View 2 Replies View Related

Why Some Macro Coding Put In Sheet And Some Put In Modules

Mar 18, 2014

I would like to know why some macro coding put in sheet and some put in modules?? What the different??

View 6 Replies View Related

Coding For Macro To Open Link?

Oct 29, 2012

Sub FollowLinks()
Dim i As Hyperlink
If (A1) = " http://www.ecb.int/stats/money/aggre...ng_amounts.zip " Then
OpenLinks " http://www.ecb.int/stats/money/aggre...ng_amounts.zip "
End If

End Sub

I'm really stuck, as I only just learnt VBA yesterday. I'd also like the macro to run when you press a button on the keyboard, is there a way to do this?

View 2 Replies View Related

Coding For Offset Cell References With Multiple Row Headings With Merged Cells

Jan 4, 2010

how to code to specify a cell in which to enter data into a spreadhseet, when the heading contains only one row.

In the attached example the headings contain multiple rows with merged cells, is there any way of overcoming this so that the entries are placed in the correct cells?

View 11 Replies View Related

Coding To Arrange And Space Out Data Elsewhere

Apr 25, 2014

I have attached a work book to this to show what i want to do.

On sheet 'lorry 1'.

I have data in columns g to m.

I need that data to transfer to the lorry sheet as per example on sheet 'what it should look like'

It needs to segregate days and leave a line clear in between drops as per example

lorry 1.xlsx‎

View 4 Replies View Related

Coding To Overwrite Worksheet Data

Apr 18, 2012

I would like to code a Userform Command button to save data by overwriting a specific row of data. The specific row is to be based on data matching in column A and column B. I'll give an example

Worksheet = "Failures"

Row 1 - Column A - Column B - Value
Row 2 - 12/3/2012 - FOX ------ 23
Row 3 - 12/3/2012 - CEF ------ 24
Row 4 - 12/3/2012 - COT ------ 23
Row 5 - 13/3/2012 - FOX ------ 56
Row 6 - 13/3/2012 - COT ------ 23
Row 7 - 14/3/2012 - FOX ------ 26

I would like the code that would search for the specific row (e.g Row 5 discovered by searching for 13/3/2012 and FOX) in the "Failures" Worksheet and then overwrite it with the following data values from a Userform called "QC"

(TextBox1) (TextBox2) (TextBox3)
13/3/2012 --- FOX -------- 24

View 1 Replies View Related

Moving Data From Two Columns Into Multiple Columns?

Feb 24, 2013

I have a large database of research data where the first column contains different categories (labelled as I, II, III, IV, V, and VI). For each row there is a data value in the second column that is numeric. What I need to do is move the data so that the data are displayed in 6 columns with the data values listed each column heading according to the category label. In the example I've shown there are 6 different categories, but the number of categories (and hence the number of columns in the final resulting sheet) will change for different data sets that I'm using. Also note the the number of cases for each different category is different (so that each column will not be even in terms of the number of rows of data under each column heading). I hope I've been able to explain what I'm looking for clearly.

I've attached a sample file showing the sample data input that I have on one sheet, and then the desired re-tablulated outcome on the second. I have done this using the auto-filter function and copy/paste, but this will take far too long for the larger datasets I'm working with.

View 2 Replies View Related

VBA Coding For Data To Activate On Data Entry

Jan 6, 2009

I have a spreadsheet which when I enter data into cell E15 (this cell is dropdown list (AL,ML,SDY,Toil)) it will copy data from another part of the spreacheet and past as value only.

So the aim is to select e15 pick from the dropdown this activates my VBA that copies data from cell A" and pastes special in A3 will this work on a dropdown and if so what code do i use. If it wont work what can i do instead.

Example I have used;

Sub ch()
If Range("F15") = "AL" Then


Range("A2").Select
Selection.Copy
Range("A3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Case Else
Exit Sub
End Select
End Sub

View 9 Replies View Related

Public And Private Sub: Move To The Next Curios Level Of Understanding Macro And VB Coding

Jun 29, 2006

Where can I obtain some working examples or explanations as to what, where, when, why, and how these Public and Private Sub are correctly implemented? I see these code used extensively but not sure why it's there yet. A macro which uses a Private Sub is in one of my workbooks. Due the "progress" of things from here I now need to move to the next curios level of understanding Macro and VB coding.

View 3 Replies View Related

Coding To Select Data Criteria Wise

Jul 29, 2013

I need to filter data on criteria wise and to move on specific sheets accordingly.

Example: sheet 1 contains all the details such as starting with AAA - 10 rows, BBB - 12 rows, CCC- 15ROWS ,DDD-13 ROWS etc in column 1.

I have created separate sheets for AAA, BBB, CCC etc

now I need all the details of AAA (in sheet1) to be moved to specific sheet AAA which i have created and so on.

I tried the below coding but there are few dependencies found.

Selection.Insert Shift:=xlDown
Rows("1:1").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="AAA"
ActiveWindow.SmallScroll Down:=-6
Rows("169:184").Select
Selection.Copy
Sheets("AAA").Select
ActiveSheet.Paste

View 2 Replies View Related

Color Coding Cells Based On Data From Another Cell?

Mar 29, 2012

I have a worksheet set up where one column of data (we shall call it "A") is the result of several other columns' calculations (uses a formula referencing other cells). I have an entirely separate cell that also gets its data from other cells (we shall call this "B"). What I'm trying to do is make the shading of column "A" dependent upon data from column "B". For example, if column "B's" value is >24, I want column "A" to shade in red.

View 10 Replies View Related

Using 2 Variables To Return Multiple Items From Multiple Sheets

Feb 14, 2009

I have a need to populate a summary worksheet using two variables to find data in two or more other worksheets.

I find writing out what I want helps some times so let me try it here.

So my variables are:

Product (there are 22 products)
Supply Less than (inset number)

These are the two criteria I want to use to produce a result.

The next issue is I have 300 stores that carry said 22 products. Each store has a unique number 0001, 0002, 0003 etc. So in a separate worksheet I have a list of the store numbers, and then the products. So each product has the store's number to the left in Column A, Column B has the product name, Column C has the quantity on hand.

What i would like to do on the summary page is select the product, and then select the supply less than or equal to 'x' and then have the stores with the selected product less than or equal to x display below.

The last part of this is then to display (data from an other sheet) on the summary page which contains the quantity of the product selected available at the warehouse for that store.

View 9 Replies View Related

IF Statement Using Multiple Variables To Give Multiple Outcomes

Feb 6, 2009

I'm looking to work out an IF statement based on a series of dates entered to give 1 of 3 possable outcomes. Where:

A1: todays date (exmaple =NOW())
B1: due date (exmaple 10/02/09)
C1: completion date (example 12/02/09)
D1: status (overdue, outstanding or completed)

D1: =IF(A1>B1,"overdue",IF(A1<B1,"outstanding",IF(C1<=>A1 & B1,"completed")))

I know the last part is totally wrong (symbols arranged in that manner), but to clarify i would like the date entered in C1 to override the other statements in the fomula to make it read "completed". If no date is entered in C1 then the formula will return either "overdue" or "outstanding" depending on the other dates in A1 and B1.

View 2 Replies View Related

Declare Multiple Subs On 1 Line Just Like Multiple Variables

May 25, 2014

I'm making a Form with multiple pages and on every page there are atleast 36 Textboxes.

[Amount] [Description] [price]

I want to run a small sub updating the price on changing the amount. My code now looks like this:

Code:
Private Sub TextBox1_Change()
Call UpdatePrice
End Sub

Private Sub TextBox2_Change()
Call UpdatePrice
End Sub

Private Sub TextBox3_Change()
Call UpdatePrice
End Sub

I have to do this on 8 pages, 24 to 36 times, which makes the code extremely long. Is there a better way to do this?

Something like:

Code:
Private Sub TextBox1_Change(), TextBox2_Change() etc...
Call UpdatePrice
End sub

View 2 Replies View Related

VBA Coding To Search Column For Data Entered In Textbox On Userform

Apr 17, 2014

I am a green as green can be beginner to VBA coding. My question is, I created a text box on my user form so the user can input a 'billing code' and when they hit submit on the user form, the vba will search the spreadsheet and land on the data entered in the text box.

View 3 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved