Did you know SD-WANs can improve network connectivity? Check out this webinar to learn how an SD-WAN simplified, one-click tool can help you migrate and manage data in the cloud.
Public Sub Tag1() Dim D As Kitchen Dim s As Labeler Set s = New Labeler Set D = New Kitchen s.OPEN_CON "mydb", "" D.OPEN_CON "KitchenData", "" Dim x As SSCommand For Each x In cmd1 x.ToolTipText = s.Tag_Name(x.Index) x.Caption = s.Tag_Name(x.Index) & vbNewLine & s.Tag_Qty(x.Index) & _ " \ " & D.Tag_2Qty(x.Index ) If s.Tag_Qty(x.Index) + 12 <= s.reOrder_tag(x.Index) + 30 Then x.ForeColor = vbRed Else x.BackColor = &H80FF80 End If If s.Tag_Qty(x.Index) = "" And D.Tag_2Qty(x.Index) = "" Then x.BackColor = &H80FF80 End If Next s.CLOSE_CON Set s = Nothing End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.