تقویم بازشونده

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

    • 2019/06/21
    • 149
    • 24.00

    [حل شده] تقویم بازشونده

    با سلام چطور میشه کاری کنیم که یه ایکون روی یک سلول قرار بدیم و پس ار کلیک و انتخاب تاریخ، تاریخ داخل سلول بیفته ممنون نه داخل فرم و باکس
    در واقع میخوام مستقیماً و بدون فرم باشه
    فایل های پیوست شده
  • mokaram
    مدير تالار اکسل و بانک اطلاعاتی

    • 2011/02/06
    • 1805
    • 74.00

    #2
    دوست عزیز شما فرمودید که فرم نمایش داده نشه اما یه سوال کاربر ازکجا تاریخ را انتخاب کنه؟
    [CENTER][IMG]http://forum.exceliran.com/signaturepics/sigpic909_10.gif[/IMG]
    [/CENTER]

    کامنت

    • reza_gh_tak

      • 2019/06/21
      • 149
      • 24.00

      #3
      نوشته اصلی توسط mokaram
      دوست عزیز شما فرمودید که فرم نمایش داده نشه اما یه سوال کاربر ازکجا تاریخ را انتخاب کنه؟
      منظورم جایی که آیکون تقویم توش قرار داره میخوام آیکون تو کنار سلول باشه با کیک روی اون تقویم بازشه و تازیخ نیز داخل سلول بیفتهClick image for larger version

Name:	Untitled.jpg
Views:	1
Size:	38.3 کیلو بایت
ID:	135541

      کامنت

      • M_ExceL

        • 2018/04/23
        • 677

        #4
        نوشته اصلی توسط reza_gh_tak
        با سلام چطور میشه کاری کنیم که یه ایکون روی یک سلول قرار بدیم و پس ار کلیک و انتخاب تاریخ، تاریخ داخل سلول بیفته ممنون نه داخل فرم و باکس
        در واقع میخوام مستقیماً و بدون فرم باشه
        سلام،
        با کمی دستکاری سابروتین sabtTarikh درست میشه.
        کد:
        Public Sub sabtTarikh()
        Dim n
        If ActiveControl.Caption <> Empty Then
        Label54.Caption = ComboBox2.Text & "/" & Format(ComboBox1.Text, "00") & "/" & Format(ActiveControl.Caption, "00")
        Label55.Caption = TbH(Label54.Caption, 2)
        Label60.Caption = J_GREGORIANDATE(Label54.Caption, 1)
        ActiveCell = Label54.Caption
        Unload Me
        End If
        نکته : ابتدا سول مورد نظر رو انتخاب کنید، سپس فرم رو اجرا کرده و تاریخ رو انتخاب کنید.
        فایل های پیوست شده
        [CENTER]Telegram Channel : [url]https://t.me/UltraOfficeSkills[/url]
        [/CENTER]

        کامنت

        • reza_gh_tak

          • 2019/06/21
          • 149
          • 24.00

          #5
          خدا خیرتون بده فقط یک سوال دیگه ممنون می شم جواب بدید اگر فقط بخوایم تو یک سلول خاص مثلاً فقط داخل h14 تقویم درج بشه باید چیکار کرد بازهم ممنون از حوصلتون

          کامنت

          • M_ExceL

            • 2018/04/23
            • 677

            #6
            نوشته اصلی توسط reza_gh_tak
            خدا خیرتون بده فقط یک سوال دیگه ممنون می شم جواب بدید اگر فقط بخوایم تو یک سلول خاص مثلاً فقط داخل h14 تقویم درج بشه باید چیکار کرد بازهم ممنون از حوصلتون
            خواهش میکنم، به این صورت اصلاح کنید :
            کد:
            Range("h14") = Label54.Caption
            فایل های پیوست شده
            [CENTER]Telegram Channel : [url]https://t.me/UltraOfficeSkills[/url]
            [/CENTER]

            کامنت

            • Amir Ghasemiyan

              • 2013/09/20
              • 4598
              • 100.00

              #7
              نوشته اصلی توسط reza_gh_tak
              خدا خیرتون بده فقط یک سوال دیگه ممنون می شم جواب بدید اگر فقط بخوایم تو یک سلول خاص مثلاً فقط داخل h14 تقویم درج بشه باید چیکار کرد بازهم ممنون از حوصلتون
              دوست عزیز لطفا اگر پاسخ سوالتون رو دریافت کردین تاپیک رو حل شده کنید

              کامنت

              چند لحظه..