Macro and Formula

[strung]

Hello, < new member, but not new to pc >

I hope to keep the many questions I have on this same thread because it is a large project and it's a "as I go" type of thing. Not sure if this idea might work but I hope it turns out the become some sort of "library on same thread" !

This is the "fine tuning,interim" stage of a specific bookeeping system where I need to make sure it adds up in Excel then it will be programed where required.
"Architecture stage", still.

The macros are usualy recorded for repetitive tasks to utilize constant data changes in the form of figures and text.
It is these figures Pasted in cells and formulated. Once the sums add up to expectation then it becomes part of the overall program development "blueprint"
of basicaly the same.

No programmers are involved, much of my work is self teach.
There is much to learn, I hope this forum will be of assistance as much as I will offer some knowledge where I can.

Question 1.
Macro.
Current Recording shows:

Sheets("Data_A").Select

Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate

Selection.Offset(1, 0).Select '*Down* < not recorded>
Selection.Copy

Sheets("Data_B").Select
Range("A1").Select

Selection.Offset(1, 0).Select ' *Down* < not recorded >

ActiveSheet.Paste

End Sub
=================================

The Question:
If the current macro code is,

Sheets("Data_A").Select

Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate

Then what is the code if the scenario is,

data updated and pasted to,

Anywhere in Sheets("Data_A")


Find that same text and or nemerical value anywhere in Sheet ("Data_A")
which is the same text and or nemerical value, constantly in
Sheet B Cell A1
then go to that location in Sheet ( Data_A)

Meaning, the same value of "Sheet_B A1" is not a fixed location as in "Sheet Data_A" when A is supdated.

Next question:

A1 B1 C1
5 5 = A1/B1*100


IF,
A1 B1 C1
BLANK OR 0 = A1/B1*100

How do I write the formula so it does not
show error or value, but to show 999.999 ?

Thanks .

More later,

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[strung]

Thanks biff.

I hope this helps close those opened text files and no mouse kliks.
It took me a while to discover part of the the same code had to be placed twice.

'
Windows("TestLog.txt").Activate

Cells.Select

Selection.Delete Shift:=xlUp
Range("A1").Select
Application.CutCopyMode = False

Application.DisplayAlerts = False

ActiveWorkbook.SaveAs Filename:="C:\Macro Test\TestFile.txt", FileFormat:= _
xlText, CreateBackup:=False

ActiveWorkbook.SaveAs Filename:="C:\Macro Test\TestFile.txt", FileFormat:= _
xlText, CreateBackup:=False

ActiveWindow.Close

End Sub

'

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[strung]

Thanks, got it the fisrt time.

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>

[Biff]

Hi!

For the 2nd question:

=IF(ISERROR(A1/B1),999.999,A1/B1*100)

Biff

"strung" <[email protected]> wrote in
message news:[email protected]...
>
> Hello, < new member, but not new to pc >
>
> I hope to keep the many questions I have on this same thread because it
> is a large project and it's a "as I go" type of thing. Not sure if this
> idea might work but I hope it turns out the become some sort of
> "library on same thread" !
>
> This is the "fine tuning,interim" stage of a specific bookeeping system
> where I need to make sure it adds up in Excel then it will be programed
> where required.
> "Architecture stage", still.
>
> The macros are usualy recorded for repetitive tasks to utilize constant
> data changes in the form of figures and text.
> It is these figures Pasted in cells and formulated. Once the sums add
> up to expectation then it becomes part of the overall program
> development "blueprint"
> of basicaly the same.
>
> No programmers are involved, much of my work is self teach.
> There is much to learn, I hope this forum will be of assistance as much
> as I will offer some knowledge where I can.
>
> Question 1.
> Macro.
> Current Recording shows:
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Selection.Offset(1, 0).Select '*Down* < not recorded>
> Selection.Copy
>
> Sheets("Data_B").Select
> Range("A1").Select
>
> Selection.Offset(1, 0).Select ' *Down* < not recorded >
>
> ActiveSheet.Paste
>
> End Sub
> =================================
>
> The Question:
> If the current macro code is,
>
> Sheets("Data_A").Select
>
> Cells.Find(What:="TestA", After:=ActiveCell, LookIn:=xlValues, _
> LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
> MatchCase:=False).Activate
>
> Then what is the code if the scenario is,
>
> data updated and pasted to,
>
> Anywhere in Sheets("Data_A")
>
>
> Find that same text and or nemerical value anywhere in Sheet
> ("Data_A")
> which is the same text and or nemerical value, constantly in
> Sheet B Cell A1
> then go to that location in Sheet ( Data_A)
>
> Meaning, the same value of "Sheet_B A1" is not a fixed location as in
> "Sheet Data_A" when A is supdated.
>
> Next question:
>
> A1 B1 C1
> 5 5 = A1/B1*100
>
>
> IF,
> A1 B1 C1
> BLANK OR 0 = A1/B1*100
>
> How do I write the formula so it does not
> show error or value, but to show 999.999 ?
>
> Thanks .
>
> More later,
>
>
> --
> strung
> ------------------------------------------------------------------------
> strung's Profile:
> http://www.excelforum.com/member.php...o&userid=24731
> View this thread: http://www.excelforum.com/showthread...hreadid=383009
>