Skip to content

Instantly share code, notes, and snippets.

View trevorcgibson's full-sized avatar

Trevor Gibson trevorcgibson

View GitHub Profile
@trevorcgibson
trevorcgibson / Excel VBA - SFDC 15 to 18
Created July 25, 2013 23:25
VBA code for Microsoft Excel to convert 15-digit Salesforce.com record ids to their 18-digit checksum version. Use by adding into a new module in the Excel VBA code editor. NOTE: I did not write this - but can't quite remember who/where I got it from. If it's yours, please let me know and I'll update to provide attribution.
Function FixID(InID As String) As String
If Len(InID) = 18 Then
FixID = InID
Exit Function
End If
Dim InChars As String, InI As Integer, InUpper As String
Dim InCnt As Integer