![]() OCurs.getText().insertString(oCurs, BARCODE128_ENCODED("13916"), True) 'Insert and select second text with Code128 AlgoritmĬell.VertJustify = .CellVertJustify. OCurs.CharHeight = 48 'Set Property for Char Size OCurs.CharFontName = "Libre Barcode 128" 'Set Property Style Font 2 13916" & vbcrlf, True) 'Insert and select OCurs.getText().insertString(oCurs, "Inv. OCurs.CharHeight = 10 'Set Property for Char Size OCurs.CharFontName = "Gill Sans MT" 'Set Property Style Font 1 (sheet) 'Activate the sheetĬell = Sheet.getCellRangeByName("F18") 'Select the cell for Test ![]() Sheet = ("Test") 'Select the sheet by name This is my code for a test and it's work fine. ![]() But since an inscription is made with a font while the BarCode uses another one, now I would like to write everything in a final cell and then serialize the print. I have already written some macroes that generate the header in the correct cells and that generate the relative Bar Code (Code128) correctly. This below the image of what I would like to be able to do: (sheet)Ĭell.String = "TEST-01" & vbcrlf 'Insert one Carriege ReturnĬell.CharFontName = "Libre Barcode 128 Text" 'I want to change font in the same cellĬell.HoriJustify = .CellHoriJustify.CENTERĬell.VertJustify = .CellVertJustify.CENTER This is my code: Public Sub FormattaCarattere() this is a light and stack font that can be. I would need it to be able to produce labels to then print with the Writer using serial printing. Montserrat font family is available to download free, you can download this font in ttf, otf and zip format. I would like to build a Uno Basic macro that allows us to set the formatting one cell in such a way as to have the content first formatted with one character and then subsequently with a different character.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |