activecell

I require a Macro that uses the contents of the current Active Cell as the criteria for the AutoFilter. The criteria will always be the last entry in column A. I have trawled though every possible solution I can find for the solution but with no success. I do not know why the following does...

Hi! I want to make a code in vba in wich the user selects a range of only one row and as many columns as he wants. In the range the user selects, the code must sum the square of the first number, then the third, the fifth and so on (2 by 2)... The result of this code has to appear exactly below...

How do I add the word Fruit with vba without kutool. from: APPLE APPLE CARROT APPLE APPLE CARROT APPLE To: FRUIT APPLE FRUIT APPLE CARROT FRUIT APPLE FRUIT APPLE CARROT FRUIT APPLE without having to manually "enter prefix"

Hi there, I want to create a macro, that inputs a string into the next available cell, in a defined row. So when the next available cell is found, a inputbox appears, the user types in the data, and then the data goes into the active cell. I currently have this: Sub Find_Blank_Row() Dim...

Hi, I am fairly new to VBA and am looking for some advice. I am trying to write code that goes through two ranges in two separate columns, checks against a condition and returns a value if true. Crucially, for each value I'd like it to add a row below and return the next value. For the first...

Hi All I have some code that selects an area within a worksheet, finds the last row. I would just like to combine the 2, so that it now autofills the formulas down. ActiveCell.Offset(2, 0).Resize(1, 12).Select LastRow = Range("S" & Rows.Count).End(xlUp).Row Please Help Craig

Is there a way for a macro to turn off the filter then run the code then filter by the exact same filter that was just turned off? Application.ScreenUpdating = False Set x = ActiveCell Set y = ActiveFilter??? ***code*** y.Filter??? x.Select Application.ScreenUpdating = True Thanks!

I am trying to reposition the cursor to the correct row and column, and keep receiving compiler syntax errors. <code> 'Written By: Dawn Queen 'For: Tools For Bending 'On: August 15, 2014 'Contact: dmcole@mail.com 'Purpose: Guide Input for Engineers and track Parts Created for Clients...

Hi everybody, I have just started learning Visual Basic so I would like to ask your help because I couldn't find a tutorial that solves my problem. I would like to write a macro that write a specified number into a specified cell if the active cell is within a range. I would like to use this...

Morning, I have got some simple code for copying formatting from a reference row and pasting it into the row that is being used (done with worksheet change) This uses offsets to figure out where to paste. This works well if a user hits the return key after entering information, but pastes in...

I am trying to write a macro that will set the value of the active cell to that of the row above. My output is similar to that below: ID # Person Person Person Person ID# Person Person What I want to do is copy and paste the ID #...

Hi, So what I am doing is pasting in data from another program. I want to write a macro to take that data, put each piece of data and put it in its own cell, then delete the first column. The issue is I can't get VBA to do this and put the data in the same spot it was. Every thing I have...

Hi. I have Table1 in which I want to be able to select a row, and copy the row into a Table2 within another sheet. In one column of the row, I have an arrow image. I've attached a simple macro to the image so that when clicked, the next few columns of the row are copied and inserted into the top...

Hi I am trying to write a very simple code which looks to see if a checkbox is checked, and if it is, it will copy a range of data from one worksheet into another worksheet. The code below works just fine for what I want, except that I’m limited to always starting the paste in cell A1 on the...

Trying to create a subroutine that takes a selected range and loops through each cell trimming off all but the first five characters. Current code is as follows: Sub TrimAcntNo() Dim Cell As Range For Each Cell In Selection ActiveCell.Formula = "=Left(activecell,5)" Next Cell...

I am trying to get the activecell to move from its starting point and loop through columns selecting rows 1:6. I keep getting "For without Next". Here is what I have so far. Thanks for any help Sub Basic() Application.ScreenUpdating = False Dim source As Worksheet Dim destination As Worksheet...

How can I get the reference of the cell that contains a hyperlink that was triggered? This may not be equal to the ActiveCell. --or-- detect the hyperlink destination. In my scenario, they are the same. Thanks,

Hello People! I hope someone here can help me... I have made a macro that copies a row into a new sheet: Sheets("Datasheet").Select Range("A2").Select ActiveCell.EntireRow.Insert Shift:=xlDown Sheets("MailMerge").Select Range("A7:G7").Select Selection.Copy Sheets("Datasheet").Select...

Good Evening, First off, I'd like to thank everyone for answering VB related questions. With your help I was able to familiarize myself somewhat with VB. Since this is my first post, I'd like to apologize if this question has already been asked. I searched on Google as well as this forum's own...

Hi All, My first post to the forum. Usually I find I am able to solve any problems I have by browsing historic posts and amending solutions to suit my needs however this one has me stumped. I have a worksheet with four columns (A,B,C & D) which is tens of thousands of rows long and grows each...