error next without for

Collapse
این تاپیک قفل است.
X
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • fimani119

    • 2018/11/10
    • 27
    • 29.00

    [حل شده] error next without for

    با سلام و وقت بخیر
    کد زیر رو نوشتم ولی موقع ران کردن اررور next without for میده چکار باید کنم رفع بشه مشکلم؟ به خاطر کپی پیست و فارسی بودن شرطم ناخونا افتاده داخل "" رئیس نوشتم داخل کد
    میخوام اگر سمت کسی مثلا رئیس بود تو شیت مربوط به اون رئیس، سلول مربوط به مبلغ (که سلول پایینیش هست) خالی بیافته




    کد:
    
    For g = 1 To 15
    If Sheet1.Cells(3, g) = "ÑÆíÓ" Then
    Sheet3.Cells(4, g) = ""
    
    
    Next g
    End If
    Last edited by Amir Ghasemiyan; 2020/03/04, 13:23. دلیل: قرار دادن كد در تگ مربوطه
  • Amir Ghasemiyan

    • 2013/09/20
    • 4598
    • 100.00

    #2
    سلام دوست عزيز
    شما ابتدا بايد If رو ببنديد بعد حلقه For رو
    دو خط آخر رو جابجا كنيد

    کامنت

    • fimani119

      • 2018/11/10
      • 27
      • 29.00

      #3
      بله درست میفرمایید ممنون این کار رو انجام دادم ولی باز هم جواب نداد.
      فکر میکنم مشکل اینجاست که فونت فارسی در اکسل 2013 قابل اجرا نیست درسته؟
      چون وقتی تو فایلم به جای رئیس به حرف انگلیسی میذارم و تو کدم اعمال میکنم جواب میده راهی داره برای فونت فارسی کاری کنم؟

      کامنت

      • حسام بحرانی

        • 2013/09/29
        • 2065
        • 72.00

        #4
        فونت فارسی

        سلام دوست عزیز
        فونت فارسی در اکسل 2013 قابل اجرا هست.

        لینک های زیر را ملاحظه کنید اگر مشکل برطرف نشد عنوان کنید تا بیشتر راهنمایی بشید.
        لینک 1
        لینک 2
        موفق باشید.
        [CENTER][B][SIZE=5][COLOR=#006600][FONT=georgia][COLOR=#800000]!With [/COLOR][/FONT][/COLOR][COLOR=#006600][FONT=georgia]God [/FONT][/COLOR][COLOR=#006600][FONT=georgia][COLOR=#800000]all [/COLOR][/FONT][/COLOR][COLOR=#800000][FONT=georgia]things are [/FONT][/COLOR][COLOR=#006600][FONT=georgia]possible[/FONT][/COLOR][/SIZE][/B][B][FONT=Tahoma]
        [/FONT][/B][/CENTER]
        [CENTER][B][FONT=Tahoma] [IMG]http://forum.exceliran.com/attachment.php?attachmentid=5334&d=1419428336[/IMG]
        [/FONT][/B][SIZE=1][FONT=Tahoma][B][FONT=Tahoma]
        [/FONT][/B][/FONT][/SIZE]
        [/CENTER]

        کامنت

        • fimani119

          • 2018/11/10
          • 27
          • 29.00

          #5
          اینکارو که انجام دادم فقط تو محیط vba فارسی تایپ میشد تو خود ویندوز یا محیطهای دیگ فقط انگلیسی میتونم تایپ کنم و زبانم عوض نمیشه

          کامنت

          • حسام بحرانی

            • 2013/09/29
            • 2065
            • 72.00

            #6
            اطلاعات بیشتر

            نوشته اصلی توسط fimani119
            اینکارو که انجام دادم فقط تو محیط vba فارسی تایپ میشد تو خود ویندوز یا محیطهای دیگ فقط انگلیسی میتونم تایپ کنم و زبانم عوض نمیشه
            درست متوجه مشکل شما نشدم!

            بیشتر میشه توضیح بدید؟!

            از یک طرف فکر می کنم کیبورد فارسی ندارید که با تایپ فارسی در انجمن، این فرض من اشتباهه!

            شاید تایپ فارسی رو که در
            vba انجام میدید در فرم ها و پیام ها خوانا نیست؟!
            [CENTER][B][SIZE=5][COLOR=#006600][FONT=georgia][COLOR=#800000]!With [/COLOR][/FONT][/COLOR][COLOR=#006600][FONT=georgia]God [/FONT][/COLOR][COLOR=#006600][FONT=georgia][COLOR=#800000]all [/COLOR][/FONT][/COLOR][COLOR=#800000][FONT=georgia]things are [/FONT][/COLOR][COLOR=#006600][FONT=georgia]possible[/FONT][/COLOR][/SIZE][/B][B][FONT=Tahoma]
            [/FONT][/B][/CENTER]
            [CENTER][B][FONT=Tahoma] [IMG]http://forum.exceliran.com/attachment.php?attachmentid=5334&d=1419428336[/IMG]
            [/FONT][/B][SIZE=1][FONT=Tahoma][B][FONT=Tahoma]
            [/FONT][/B][/FONT][/SIZE]
            [/CENTER]

            کامنت

            • fimani119

              • 2018/11/10
              • 27
              • 29.00

              #7
              ببینید از کنترل پنل current system local رو که presian انتخاب کردم و سیستم و ریستارت کردم تو محیط vba فارسی تایپ میشد ولی تو خود اکسل زبانم تغییر نمیکرد و فقط انگلیسی تایپ میشد به خاطر همین current system local رو برش گردوندم به حالت انگلیسی
              از سرچ هایی ک تو سایت انجام دادم کد اسکی رو پیدا کردم ولی بلد نیستم چطوری ازش استفاده کنم میتونید راهنماییم کنید لطفا؟

              کامنت

              چند لحظه..