Mit welcher Fehlermeldung?
Da fehlt was. Mit dem .colums(i).Hide sagst du, dass Spalten versteckt werden sollen. Aber du sagst nicht, in welchem Blatt. Und ich glaube, da musst du auch ein true setzen.
Warum befragen wir nicht die offizielle Dokumentation?
https://msdn.microsoft.com/de-de/vba/excel-vba/articles/range-hidden-property-excel
For i = 3 To 25
Worksheets("Hoffnung").Columns(i).Hidden = True
Next