the excel file im working on performs code too slow. it tak emore than
30min to upload and update everything. is there anything i can do to
make it perform a little faster

heres the code im using:

For a = 2 To 2000
strBlah = Sheet5.Cells(a, 6)
Sheet10.Cells(g, 1) = strBlah
Sheet10.Cells(g, 2) = Sheet5.Cells(a, 14)
Sheet10.Cells(g, 3) = Sheet5.Cells(a, 3) & " " & Sheet5.Cells(a,
8) & " " & Sheet5.Cells(a, 10) & " Phn#:" & Sheet5.Cells(a, 11)
Sheet10.Cells(g, 4) = Sheet5.Cells(a, 16)
g = g + 1
Next a

Application.ScreenUpdating = True