Как автоматически обновлять штрихкоды при изменении ячейки?

Как автоматически обновлять штрихкоды при изменении ячейки?

С EMF-штрихкодами штрихкоды обновляются во время печати и при сохранении документа. Если вам нужно обновлять штрихкоды сразу же при изменении определённой ячейки или диапазона, это можно сделать с помощью макроса:

• Включите «Refresh barcodes on save» в опциях надстройки.


• Добавьте следующий код на ваш лист Excel (ALT-F11) и сохраните его как книгу с поддержкой макросов.
  
  Private Sub Worksheet_Change(ByVal Target As Range)
' specify the range, which will trigger the auto-save here
If (InRange(Target, Range("A1:A10"))) Then
Application.DisplayStatusBar = True
Application.ActiveWorkbook.Save
Application.StatusBar = "Auto-Save done!"
End If
End Sub Function InRange(Range1 As Range, Range2 As Range) As Boolean
InRange = Not (Application.Intersect(Range1, Range2) Is Nothing)
End Function


Макрос сохранит документ, и это вызовет обновление штрихкода.