[VB/EXCEL] Conversione da data gregoriana a giuliana

[mainframe]

risposta chiarissima come sempre...
l'unica cosa che non mi torna è la && nel concatenare le stringhe, mi funziona solo se ne metto una sola..
Il codice funzionante è questo:

For rigaInput = 2 To fI.Cells(fI.Rows.Count, 1).End(xlUp).Row  
years4 = Format(fI.Cells(rigaInput, 1), "yyyy") 
years2 = Format(fI.Cells(rigaInput, 1), "yy")
hours = Format(fI.Cells(rigaInput, 1), "hh") 
gregorian = Format(fI.Cells(rigaInput, 1), "dd/mm/yyyy") 
dateTo = "01/01/" & years4 
julian = DateDiff("d", dateTo, gregorian)  
fI.Cells(rigaInput, 1) = years2 & " " & julian & " " & hours  
Next rigaInput 

non è certo alta programmazione ma fa quello che serve..
grazie dell'aiuto...