copy cell values from mutiplesheets in a wkbook with if condition

[sridharmasi79]

sir, i want to copy multiple cell value in different rows & columns from all sheets in a workbook with if condition

for example,
in wrksheet("Ramu")
E31 is Rs.4000
C4 is "NAME" Ramu
C7 is "DATE" 21/08/2017
D4 is Rs.5000
F6 is ......
F7 is ......sooo on

like this, im having many wrksheets having different Datas at the same cell value(i.e E31, C4, C7, D4)

i want to copy Datas to my wrksheet("MASTER") to this manner

A1 = C4("NAME")
B1 = C7("DATE")
C1 = D4(AMOUNT)
D1 = F7
E1 = F6
AND .....

if Range("E31")>100 then in all sheets from my workbook

if Range ("E31") is not >100, then it should not copy the data from all sheets

every time when i run this macro it should clear all the datas from my wrksheet("MASTER") & copy it newly to get the new data.

is there any code to solve this for me.

 

[sridharmasi79]

sir,
anynhelp about this vba code