Thread: Formula help ... moving to next cell everyday

No one with an idea?

Not using formulas.

You could use a macro and run it whenever you want...

Option Explicit
Sub testme()

Dim wks As Worksheet
Dim FromCell As Range
Dim ToCell As Range

Set wks = Worksheets("sheet1")

With wks
Set FromCell = .Range("N8")
Set ToCell = .Cells(.Rows.Count, "M").End(xlUp).Offset(1, 0)

ToCell.Value = FromCell.Value
FromCell.ClearContents 'maybe???
End With

End Sub


chisigs2 wrote:
>
> No one with an idea?

--

Dave Peterson

No one with an idea?

Not using formulas.

You could use a macro and run it whenever you want...

Option Explicit
Sub testme()

Dim wks As Worksheet
Dim FromCell As Range
Dim ToCell As Range

Set wks = Worksheets("sheet1")

With wks
Set FromCell = .Range("N8")
Set ToCell = .Cells(.Rows.Count, "M").End(xlUp).Offset(1, 0)

ToCell.Value = FromCell.Value
FromCell.ClearContents 'maybe???
End With

End Sub


chisigs2 wrote:
>
> No one with an idea?

--

Dave Peterson

No one with an idea?

Not using formulas.

You could use a macro and run it whenever you want...

Option Explicit
Sub testme()

Dim wks As Worksheet
Dim FromCell As Range
Dim ToCell As Range

Set wks = Worksheets("sheet1")

With wks
Set FromCell = .Range("N8")
Set ToCell = .Cells(.Rows.Count, "M").End(xlUp).Offset(1, 0)

ToCell.Value = FromCell.Value
FromCell.ClearContents 'maybe???
End With

End Sub


chisigs2 wrote:
>
> No one with an idea?

--

Dave Peterson

No one with an idea?

Not using formulas.

You could use a macro and run it whenever you want...

Option Explicit
Sub testme()

Dim wks As Worksheet
Dim FromCell As Range
Dim ToCell As Range

Set wks = Worksheets("sheet1")

With wks
Set FromCell = .Range("N8")
Set ToCell = .Cells(.Rows.Count, "M").End(xlUp).Offset(1, 0)

ToCell.Value = FromCell.Value
FromCell.ClearContents 'maybe???
End With

End Sub


chisigs2 wrote:
>
> No one with an idea?

--

Dave Peterson

I have a cell that is linked to another page to pull in the MTD cash
posted per client. I need a formula to put in a column that will show
0.00 and fill in everyday automatically.

Example

Today N8 = 100.00 M10 = 100.00
Tomorrow N8 = 150.00 M11 = 150.00
The next day N8 = 250.00 M12 = 250.00

etc

No one with an idea?

Not using formulas.

You could use a macro and run it whenever you want...

Option Explicit
Sub testme()

Dim wks As Worksheet
Dim FromCell As Range
Dim ToCell As Range

Set wks = Worksheets("sheet1")

With wks
Set FromCell = .Range("N8")
Set ToCell = .Cells(.Rows.Count, "M").End(xlUp).Offset(1, 0)

ToCell.Value = FromCell.Value
FromCell.ClearContents 'maybe???
End With

End Sub


chisigs2 wrote:
>
> No one with an idea?

--

Dave Peterson