تعیین اندازه

Collapse
این تاپیک قفل است.
X
X
Collapse
 
  • صفحه از 1
  • زمان
  • نمایش
حذف همه
new posts
قبلی template بعدی
  • میثم مقدم نیا

    • 2017/03/23
    • 558
    • 41.00
    #1

    [حل شده] تعیین اندازه

    سلام
    دوستان از طریق VBA چطور میتونم آخرین سطر پر را انتخاب کنم (هایلات بشه) تا بتونم اندازه ارتفاع اون را تغیر بدم
    کد PHP:
    Sub select01()

    Dim lastcount as Integer

    lastcount     = Calls(Rows.Count, 1).End(xlUp).Row

    End Sub 
    با کد بالا میرم به آخرین سطر پر ولی نمیتونم آخرین سطر مثلا A6 هست را انتخاب کنم
    ممنون میشم اگه راهنماییم کنید
    [HR][SIZE=5][COLOR="#0000FF"][FONT=Times New Roman][B] در سرزمینی کہ نتوان مردانہ زیست ، مردانہ مردن بهتر از این زندگیست [/B][/FONT][/COLOR][/SIZE][/HR]
    برچسب ها: هیچ‌کدام
    • Amir Ghasemiyan

      • 2013/09/20
      • 4598
      • 100.00
      #2
      سلام دوست عزیز
      متوجه نمیشم چطور نمیتونید انتخاب کنید؟
      قسمت سخت سخته رو رفتید که
      با این خط کد میتونید به سلول A6 که ردیف آخر هست دسترسی داشته باشید

      کد:
      range("A"&lastcount)

        کامنت

        • میثم مقدم نیا

          • 2017/03/23
          • 558
          • 41.00
          #3
          نوشته اصلی توسط Amir Ghasemiyan
          سلام دوست عزیز
          متوجه نمیشم چطور نمیتونید انتخاب کنید؟
          قسمت سخت سخته رو رفتید که
          با این خط کد میتونید به سلول A6 که ردیف آخر هست دسترسی داشته باشید

          کد:
          range("A"&lastcount)
          سلام
          استاد ممنون از راهنمایتون
          گاهی آدم فکرش اینقدر درگیر مساعل پیچیده میشه که مساعل پیش پا افتاده را نمیبینه ، یا از خستگی زیادی یا از فکر زیادی
          [HR][SIZE=5][COLOR="#0000FF"][FONT=Times New Roman][B] در سرزمینی کہ نتوان مردانہ زیست ، مردانہ مردن بهتر از این زندگیست [/B][/FONT][/COLOR][/SIZE][/HR]

            کامنت

            • میثم مقدم نیا

              • 2017/03/23
              • 558
              • 41.00
              #4
              نوشته اصلی توسط Amir Ghasemiyan
              سلام دوست عزیز
              متوجه نمیشم چطور نمیتونید انتخاب کنید؟
              قسمت سخت سخته رو رفتید که
              با این خط کد میتونید به سلول A6 که ردیف آخر هست دسترسی داشته باشید

              کد:
              range("A"&lastcount)
              وقتی فایل را به صورت زیر نوشتم پیغام خطا میده
              کد PHP:
              Sub select01() 

              Dim lastcount as Integer 

              lastcount               = Calls(Rows.Count, 1).End(xlUp).Row 

              Range              ("A" & lastcount)

              End Sub 
              پیغام خطای
              Compile Error:
              Invalid use of property
              Last edited by میثم مقدم نیا; 2019/12/28, 12:20.
              [HR][SIZE=5][COLOR="#0000FF"][FONT=Times New Roman][B] در سرزمینی کہ نتوان مردانہ زیست ، مردانہ مردن بهتر از این زندگیست [/B][/FONT][/COLOR][/SIZE][/HR]

                کامنت

                • Amir Ghasemiyan

                  • 2013/09/20
                  • 4598
                  • 100.00
                  #5
                  خب شما مشخص نکردید میخواهید با اون سلول چکار کنید!!!
                  میخواهید پاکش کنید؟ میخواهید انتخابش کنید؟ میخواهید مقدارش رو تغییر بدید؟ میخواهید مقدارش رو کپی کنید؟ میخواهید در سلول زیریش مقدار وارد کنید؟

                  شما با نوشتن range() مشخص کردید که میخواهید با یک سلول یا یک محدوده کاری انجام بدید ولی نگفتید چکار

                    کامنت

                    • میثم مقدم نیا

                      • 2017/03/23
                      • 558
                      • 41.00
                      #6
                      نوشته اصلی توسط amir ghasemiyan
                      خب شما مشخص نکردید میخواهید با اون سلول چکار کنید!!!
                      میخواهید پاکش کنید؟ میخواهید انتخابش کنید؟ میخواهید مقدارش رو تغییر بدید؟ میخواهید مقدارش رو کپی کنید؟ میخواهید در سلول زیریش مقدار وارد کنید؟

                      شما با نوشتن range() مشخص کردید که میخواهید با یک سلول یا یک محدوده کاری انجام بدید ولی نگفتید چکار
                      میخوام سطر مثل a6 کامل انتخاب بشه
                      [HR][SIZE=5][COLOR="#0000FF"][FONT=Times New Roman][B] در سرزمینی کہ نتوان مردانہ زیست ، مردانہ مردن بهتر از این زندگیست [/B][/FONT][/COLOR][/SIZE][/HR]

                        کامنت

                        • Amir Ghasemiyan

                          • 2013/09/20
                          • 4598
                          • 100.00
                          #7
                          براي انتخاب رديف آخر ميتونيد از اين كد استفاده كنيد

                          کد:
                          Rows(lastcount).Select

                            کامنت

                            قبلی template بعدی
                            چند لحظه..