Αλλαγές στο βασικό παράδειγμα:

Θέλει να...				Τροποποιεί

Διαβάζει από άλλο φύλλο			Set sourceSheet = sourceWorkbook.Sheets("AnotherSheet")
Διαβάζει από άλλο workbook		Αλλάζει το path στο Workbooks.Open(...)
Διατρέχει μέχρι κενό			Αντικαθιστά For i = 3 To 100 με Do While sourceSheet.Cells(i, 1).Value <> ""
Διαβάζει άλλες στήλες			Αλλάζει τα .Cells(i, 3) ή .Cells(i, 5)
Εφαρμόζει άλλη συνθήκη			Αλλάζει το If value2 > 100 Then
Γράφει σε άλλο φύλλο ή workbook		Αλλάζει targetSheet = ... ή targetWorkbook.Sheets(...)