Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > microsoft.public.excel.programming > #108049

Re: Manage errors with multiple InPut Boxes

From Claus Busch <claus_busch@t-online.de>
Newsgroups microsoft.public.excel.programming
Subject Re: Manage errors with multiple InPut Boxes
Date 2015-09-28 17:43 +0200
Organization A noiseless patient Spider
Message-ID <mubn45$bcn$1@dont-email.me> (permalink)
References <8b195265-26d2-499d-ae33-03a9284868e0@googlegroups.com> <mubdfb$2d0$1@dont-email.me> <0700d6d3-84c6-4f7f-9b23-fbce6a8b4fd9@googlegroups.com>

Show all headers | View raw


Hi Howard,

Am Mon, 28 Sep 2015 07:21:48 -0700 (PDT) schrieb L. Howard:

> Out put is always text but is not used in formulas in this useage.

change the last part of the code to  change numbers to real numbers:

If Len(Empl_Info) = 0 Or Empl_Info = False Then
    MsgBox "No Entry"
    Exit Sub
End If

myArr = Split(Empl_Info, ",")

With Sheets("Master")
    Set Dest = .Cells(Rows.Count, 1).End(xlUp)(2)
    For i = LBound(myArr) To UBound(myArr)
        If IsNumeric(myArr(i)) Then
            Dest.Offset(, i) = CLng(myArr(i))
        Else
            Dest.Offset(, i) = myArr(i)
        End If
    Next
End With

I guess a UserForm will be more readable and easier to use.


Regards
Claus B.
-- 
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional

Back to microsoft.public.excel.programming | Previous | NextPrevious in thread | Next in thread | Find similar | Unroll thread


Thread

Manage errors with multiple InPut Boxes "L. Howard" <lhkittle@comcast.net> - 2015-09-28 01:42 -0700
  Re: Manage errors with multiple InPut Boxes Claus Busch <claus_busch@t-online.de> - 2015-09-28 12:22 +0200
    Re: Manage errors with multiple InPut Boxes "L. Howard" <lhkittle@comcast.net> - 2015-09-28 04:15 -0700
      Re: Manage errors with multiple InPut Boxes "L. Howard" <lhkittle@comcast.net> - 2015-09-28 05:05 -0700
        Re: Manage errors with multiple InPut Boxes "L. Howard" <lhkittle@comcast.net> - 2015-09-28 05:10 -0700
          Re: Manage errors with multiple InPut Boxes Claus Busch <claus_busch@t-online.de> - 2015-09-28 14:26 +0200
            Re: Manage errors with multiple InPut Boxes "L. Howard" <lhkittle@comcast.net> - 2015-09-28 05:48 -0700
  Re: Manage errors with multiple InPut Boxes Claus Busch <claus_busch@t-online.de> - 2015-09-28 12:28 +0200
  Re: Manage errors with multiple InPut Boxes GS <gs@v.invalid> - 2015-09-28 08:59 -0400
    Re: Manage errors with multiple InPut Boxes "L. Howard" <lhkittle@comcast.net> - 2015-09-28 07:21 -0700
      Re: Manage errors with multiple InPut Boxes Claus Busch <claus_busch@t-online.de> - 2015-09-28 17:43 +0200
      Re: Manage errors with multiple InPut Boxes GS <gs@v.invalid> - 2015-09-28 12:21 -0400
        Re: Manage errors with multiple InPut Boxes "L. Howard" <lhkittle@comcast.net> - 2015-09-28 09:45 -0700
          Re: Manage errors with multiple InPut Boxes GS <gs@v.invalid> - 2015-09-28 17:54 -0400
            Re: Manage errors with multiple InPut Boxes "L. Howard" <lhkittle@comcast.net> - 2015-09-29 19:01 -0700
              Re: Manage errors with multiple InPut Boxes GS <gs@v.invalid> - 2015-09-30 20:36 -0400
                Re: Manage errors with multiple InPut Boxes "L. Howard" <lhkittle@comcast.net> - 2015-10-01 00:15 -0700
                Re: Manage errors with multiple InPut Boxes GS <gs@v.invalid> - 2015-10-02 14:40 -0400
                Re: Manage errors with multiple InPut Boxes "L. Howard" <lhkittle@comcast.net> - 2015-10-02 13:41 -0700
                Re: Manage errors with multiple InPut Boxes GS <gs@v.invalid> - 2015-10-02 16:46 -0400
                Re: Manage errors with multiple InPut Boxes GS <gs@v.invalid> - 2015-10-03 13:21 -0400

csiph-web