insert formula by code

Hi there, I have tried searching other threads but they were all too old and didn't really answer my problem... I have a command button that when i click it needs to insert a formula into a target cell, i have done this with another button in the same sheet and it works fine but VBA has a...

Dim wb As Workbook Dim ws As Worksheet Dim TotalTrans As Integer Dim FoundRow As Range Dim MyFolder, MyFile, MyFileName, MySheetName, ReportDate As String Dim FileType As String Dim MisFileName() As String, PaymentFileType() As String Dim MisTrans() As Integer Dim i, j, k, m As Integer i = 2 j =...

Any thoughts why my If .value = "A" or "B" then statement isn't working? Sub Remove_CorrNeg_Transaction_Entries() Dim Dest_Firstrow As Long Dim Dest_Lastrow As Long Dim lRow As Long Dim CalcMode As Long Dim ViewMode As Long With Application CalcMode =...

I'm trying to create a macro that will insert a formula into Column D and fill all the way down the column. The formula is a series of IF statements referencing the corresponding cell in Column C. The formula I would like to insert is the following: =IF(C2="G1","Generic...

Hi, I think I'm nearly there with this, but just need a bit of help tweaking it to make it work. I'm wanting to use vba to add an indirect formula in a range of cells with a lastrow variable. So far I have this, but I can't get the last row variable to work. When I set the Range as (D20:F30)...

Hello all, I am using the following to create subtotals from a selection Range("B3:N1000").Select Selection.Subtotal GroupBy:=2, Function:=xlSum, _ TotalList:=Array(5, 6, 7) ActiveSheet.Outline.ShowLevels RowLevels:=2 I need to add a column with the sales percentage: the Net...

Hi everybody! I have columns of data that are generated by formulae inserted by the following code. Private Sub XtendData() Dim w As Integer ‘Insert formulae in Col 22 For w = 12 To 200 Step 2 Cells(w, 22).FormulaR1C1 = "=IF(OR(RC[-14]="""", RC[-8] = """"), """", IF(RC[-14]...