IMEMode Property Example

This example sets the data input rule for cell E5.

With Range("E5").Validation
    .Add Type:=xlValidateWholeNumber, _
        AlertStyle:= xlValidAlertStop, _
        Operator:=xlBetween, Formula1:="5", Formula2:="10"
    .InputTitle = "seisuuchiseisuuchiseisuuchi"
    .ErrorTitle = "seisuuchiseisuuchiseisuuchi"
    .InputMessage = "5 karakara 10 noseisuuseisuuonyuuryokunyuuryokushiteshitekudasaikudasaikudasaikudasai."
    .ErrorMessage = "nyuuryokunyuuryokudekirunowadekirunowadekirunowadekirunowadekirunowa 5 karakara 10 madenomadenomadenonedesudesu."
    .IMEMode = xlIMEModeAlpha
End With