Sub ConfigureAutoComplete() Dim auto As AutoComplete 'Get the AutoComplete object Set auto = ThisIbmTerminal.Productivity.AutoComplete 'Clear all suggestions that are currently defined auto.ClearSuggestions 'Set the maximum word length auto.MaxWordLength = 54 'Enable Auto Complete auto.Enabled = True End Sub