Repeating transactions


New Member
Aug 10, 2010
Hi all,
I am using Excel 2003
I want to write a VB command that will repeat the same command for each value on the cells from B5 to B11

for each cell gcapplication should be equal to lcsheetname.
Her eis what i have done

Sub repeat()

Dim lnEssSheets As Integer
Dim Cube As Integer
Dim rnumber As Integer
dim gcapplication as string

For Cube = 1 To application.WorksheetFunction.CountA("B5:B100")

rnumber = Cube + 4

lcSheetName = Worksheets("Control").Cells(rnumber, 2).Name

gcApplication = lcSheetName

End Sub

Would be glad if anybody can help


Some videos you may like

Excel Facts

How to fill five years of quarters?
Type 1Q-2023 in a cell. Grab the fill handle and drag down or right. After 4Q-2023, Excel will jump to 1Q-2024. Dash can be any character.

Subscribe on YouTube

Watch MrExcel Video

Forum statistics

Latest member

This Week's Hot Topics

  • Sort code advice please
    Hi, I have the code below which im trying to edit but getting a little stuck. This was the original code which worked fine,columns A-F would sort...
  • SUMPRODUCT with nested If statement
    Hi everyone, Hope you're all well. I'm hoping someone will be able to point me in the right direction with a problem I'm having with a SUMPRODUCT...
  • VBA - simple sort is killing me!
    Hello all! This should be so easy, but not for me, apparently! I have a table of data that can be of varying lengths and widths. My current macro...
  • Compare Two Lists
    I have two Lists and I need to be able to Identify differences between them. List 100 comes from a workbook - the other is downloaded form the...
  • Formula that deducts points for each code I input.
    I am trying to create a formula that will have each student in my class start at 100 points and then for each code that I enter (PP for Poor...
  • Conditional formatting formula required for day of week and a value
    Hi, I have a really simple spreadsheet where column A is the date, column B is the activity total shown as a number and column C states the day of...