rcell

I was asked to find and replace pound signs with a percentage sign in a particular workbook. Rather than doing find and replace all, I want to loop through all worksheets in VBA and see if the first character in each cell is a pound sign, remove that pound sign and replace it with a percentage...

Hi all I am new to VBA/Excel so I apologise in advance for my ignorance I am trying to insert code that will count number of cells with a fill colour, I found the code below which works once but if you alter the number of cells with fill colour it does not automatically update the count...

Hello I was wondering if anyone could help I got the below from a post on here quite a while ago which is brilliant it has helped with our spreadsheet but we are having a couple ofissues which I wondered if anyone could possibly help me resolve. 1. We have quite a large amount of data we...

I came across the below VBA and need some help to modify it. First it auto fills the date and time in I1 whenever you selected from a drop down in H1. I have also added another to it that adds date and time to cell J1 whenever you choose "Closed" in cell E1. This all works great for what I want...

Private Sub CommandButton1_Click() Dim xWs As Worksheet Dim xcsvFile As String Dim rCell As Range Dim rRow As Range lFnum As Long Dim rowCount As Long For Each xWs In Application.ActiveWorkbook.Worksheets For Each rRow In ActiveWorkbook.UsedRange.Rows If rowCount > 1 Then For Each rCell In...

Hi peeps - Happy New Year! I was wondering - I need to do a lookup / or Match for cells that are coloured in red. I have been advised the below is best - but I'm worried that it will only count the "numbers" in the cell which is coloured in. What I actually want is to return a sum based on...

Alright, I am making a to do list that is pretty automated that will add sheets and delete sheets as the days move forward (Dates in the past will be saved to a folder and deleted, current/future dates will remain). This is the bit of code i'm having a lot of trouble with. The main...

hello all... i have macro code, but i dont know it works...i have try but still error.. somebody would help me : this code : Private Sub Worksheet_Change(ByVal Target As Range)<code style="margin: 0px; padding: 0px; font-style: inherit; font-weight: inherit; line-height: 12px;"> Dim r As...

Hello Everyone, First of all, I have to say, this forum has helped me immensely and I am so thankful for all the help offered here! I have not been able to find a solution to this despite the extensive research I have attempted. I have a VBA code that will prevent the user from modifying any...

Can anyone help me amend this snippet to instead of adding periods to break up a phone number to replacing the first four digits with an "x"? Thanks, J Sub SymbolsInPhN() Dim rRng As Range, rCell As Range Set rRng = Range("A2", Range("A" & Rows.Count).End(xlUp)) With...

how do I change the below to not be an event, but run from a macro1? thanks Jan Private Sub Worksheet_Change(ByVal Target As Range) Dim rInt As Range Dim rCell As Range 'change the input cell range as desired Set rInt = Intersect(Target, Range("plus20pct")) If Not rInt Is...

Hello, I have a macro that I need to rewrite because the data file changes. The new macro needs to be based on other cues (unlike before is was spacing and offsetting -->Im a rookie). I need to search for three things, then return a value from a different column. Where I am running into...