.vscode/launch.json

@@ -1,27 +0,0 @@
-{
-    // Use IntelliSense to learn about possible attributes.
-    // Hover to view descriptions of existing attributes.
-    // For more information, visit: https://go.microsoft.com/fwlink/?linkid=830387
-    "version": "0.2.0",
-    "configurations": [
-        {
-            "name": ".NET Core Launch (console)",
-            "type": "coreclr",
-            "request": "launch",
-            "preLaunchTask": "build",
-            "program": "C:\\Program Files\\Microsoft Office\\root\\Office16\\EXCEL.EXE",
-            "args": [
-                "${workspaceFolder}\\RhSolutions.AddIn\\bin\\Debug\\net6.0-windows\\RhSolutions-AddIn64.xll"
-            ],
-            "cwd": "${workspaceFolder}",
-            "console": "internalConsole",
-            "stopAtEntry": false,
-            "requireExactSource": false
-        },
-        {
-            "name": ".NET Core Attach",
-            "type": "coreclr",
-            "request": "attach"
-        }
-    ]
-}

.vscode/tasks.json

@@ -1,12 +0,0 @@
-{
-	"version": "2.0.0",
-	"tasks": [
-		{
-			"type": "dotnet",
-			"task": "build ${workspaceFolder}\\RhSolutions.AddIn\\RhSolutions.AddIn.csproj",
-			"group": "build",
-			"problemMatcher": [],
-			"label": "build"
-		},
-	]
-}

Install.ps1

@@ -0,0 +1,14 @@
+$object = Invoke-WebRequest -Uri "https://gitea.cebotari.ru/api/v1/repos/chebser/RhSolutions-AddIn/releases/latest" | ConvertFrom-Json 
+$download_link = $object.assets[1].browser_download_url
+Invoke-WebRequest -Uri $download_link -OutFile "$env:appdata\Microsoft\AddIns\RhSolutions-AddIn-packed.xll"
+
+$excel = New-Object -ComObject Excel.Application
+foreach ($addin in $excel.AddIns2)
+{
+    $title = $addin.Title
+    if ($title -eq 'RhSolutions Add-In')
+    {
+        $addin.Installed = $true
+    }
+}
+$excel.Quit()

README.md

@@ -8,13 +8,12 @@
 - Объединение нескольких прайс-листов в один файл
 - Поиск пар артикул-количество в любой сторонней таблице и экспорт в таблицу заказов
 - Подбор монтажных гильз для фитингов RAUTITAN
-- Подбор ремонтных муфт по количеству трубы
 - Экспорт таблицы заказов в девятиграфку по ГОСТ
 
 *Для работы функций "Экспорт", "Актуализация" и "Объединение" требуется указать путь к файлу пустого прайс-листа РЕХАУ*
 
 ## Реализованные формулы для работы с артикулами
-- ```=РЕХАУ()``` - поиск артикула РЕХАУ по произвольному запросу в сервисе [RhSolutions-Api](https://gitea.cebotari.ru/chebser/RhSolutions-Api) 
+- ```=RHSOLUTIONS()``` и ```=РЕХАУ()``` - поиск в удаленной базе данных
 - ```=РЕХАУАРТИКУЛ()``` - экстракция артикула РЕХАУ из любой строки по регулярному выражению
 - ```=РЕХАУИМЯ()``` - поиск названия артикула по номеру
 - ```=РЕХАУЦЕНА()``` - поиск цены в евро по номеру артикула

RhSolutions.AddIn/AddIn/CurrencyFunctions.cs

@@ -1,27 +0,0 @@
-namespace RhSolutions.AddIn;
-
-public static class CurrencyFunctions
-{
-    private static readonly ICurrencyClient currencyClient =
-        RhSolutionsAddIn.ServiceProvider.GetRequiredService<ICurrencyClient>();
-
-    [ExcelFunction(Name = "КУРСЕВРО")]
-    public static object GetEuroCurrencyRate(double dateField)
-    {
-        DateTime date = dateField == 0 ? DateTime.Today : DateTime.FromOADate(dateField);
-        var functionName = nameof(GetEuroCurrencyRate);
-        var parameters = new object[] { date };
-
-        var exchangeRate = ExcelAsyncUtil.RunTask(functionName, parameters, async () =>
-        {
-            var requestResult = await currencyClient.GetExchangeRate(date);            return requestResult ?? -1m;
-        });
-
-        if (exchangeRate is not decimal)
-        {
-            return "Загрузка...";
-        }
-
-        return (decimal)exchangeRate < 0 ? ExcelError.ExcelErrorNA : exchangeRate;
-    }
-}

RhSolutions.AddIn/AddIn/RhSolutionsAddIn.cs

@@ -1,7 +1,14 @@
 using System.Net;
+using ExcelDna.IntelliSense;
+#if !NET472
+using System.Runtime.Versioning;
+#endif
 
 namespace RhSolutions.AddIn;
 
+#if !NET472
+[SupportedOSPlatform("windows")]
+#endif
 public sealed class RhSolutionsAddIn : IExcelAddIn
 {
     public static Application Excel { get; private set; }
@@ -48,13 +55,22 @@ public sealed class RhSolutionsAddIn : IExcelAddIn
 
         EventsUtil.Initialize();
 
+        if (Environment.GetEnvironmentVariable("ISTESTING") == "false")
+        {
+            IntelliSenseServer.Install();
+        }
+
         ServicePointManager.SecurityProtocol =
             SecurityProtocolType.Tls12;
-        ServicePointManager.DefaultConnectionLimit = 50;
     }
 
     public void AutoClose()
     {
         EventsUtil.Uninitialize();
+
+        if (Environment.GetEnvironmentVariable("ISTESTING") == "false")
+        {
+            IntelliSenseServer.Uninstall();
+        }
     }
 }

RhSolutions.AddIn/AddIn/RhSolutionsFunctions.cs

@@ -1,76 +1,99 @@
-namespace RhSolutions.AddIn;
+#if !NET472
+using System.Runtime.Versioning;
+#endif
 
-public static class RhSolutionsFunctions
-{
-	private static readonly IDatabaseClient databaseClient =
-		RhSolutionsAddIn.ServiceProvider.GetService<IDatabaseClient>();
-	private static readonly ICurrencyClient currencyClient =
-		RhSolutionsAddIn.ServiceProvider.GetRequiredService<ICurrencyClient>();
+using Microsoft.Extensions.Caching.Memory;
 
-	[ExcelFunction(Name = "РЕХАУ")]
-	public static object ProductSearch(object[,] values)
+namespace RhSolutions.AddIn;
+
+#if !NET472
+[SupportedOSPlatform("windows")]
+#endif
+public class RhSolutionsFunctions
 {
-		List<string> strings = new();
-		int rows = values.GetLength(0);
-		int columns = values.GetLength(1);
-		for (int row = 0; row < rows; row++) 
+    [ExcelFunction(Description = "Поиск артикула в базе данных")]
+    public static object RHSOLUTIONS([ExcelArgument(Name = "СТРОКА", Description = "Ячейка с артикулом РЕХАУ или поисковый запрос в свободной форме")] string line)
     {
-			for (int column = 0; column < columns; column++) 
+        IDatabaseClient databaseClient = RhSolutionsAddIn.ServiceProvider.GetService<IDatabaseClient>();
+
+        ProductSku.TryParse(line, out var skus);
+
+        if (ExcelAsyncUtil.Run(nameof(RHSOLUTIONS), line, delegate
         {
-				object value = values[row, column];
-				strings.Add(value.ToString());
+            return databaseClient.GetProducts(line)
+                .GetAwaiter()
+                .GetResult();
+        }) is not IEnumerable<Product> requestResult)
+        {
+            if (skus.Any())
+            {
+                return $"{skus.First()} ...";
             }
-		}
-		
-		string query = string.Join(" ", strings.ToArray());
-		var functionName = nameof(ProductSearch);
-		var parameters = new object[] { query };
-		if (ExcelAsyncUtil.RunTask(functionName, parameters, async () =>
-		{
-			return await databaseClient.GetProducts(query);
-		}) is not IEnumerable<Product> products)
+            else
             {
                 return "Загрузка...";
             }
-		else if (!products.Any())
+        }
+
+        else
+        {
+            if (!requestResult.Any() && !skus.Any())
+            {
+                return ExcelError.ExcelErrorNA;
+            }
+            else if (!requestResult.Any())
+            {
+                return $"{skus.First()}";
+            }
+            else
+            {
+                var firstProduct = requestResult.First();
+                return $"{firstProduct.ProductSku} {firstProduct.Name}";
+            }
+        }
+    }
+
+    [ExcelFunction(Description = "Поиск артикула в базе данных")]
+    public static object РЕХАУ([ExcelArgument(Name = "СТРОКА", Description = "Ячейка с артикулом РЕХАУ или поисковый запрос в свободной форме")] string line)
+        => RHSOLUTIONS(line);
+
+    [ExcelFunction(Description = "Выделить артикул РЕХАУ из ячейки")]
+    public static object РЕХАУАРТИКУЛ([ExcelArgument(Name = "СТРОКА", Description = "Ячейка содержащая артикул РЕХАУ")] string line)
+    {
+        if (ProductSku.TryParse(line, out var skus))
+        {
+            return skus.First().Id;
+        }
+        else
+        {
+            return ExcelError.ExcelErrorNA;
+        }
+    }
+
+    [ExcelFunction(Description = "Поиск названия по артикулу РЕХАУ")]
+    public static object РЕХАУИМЯ([ExcelArgument(Name = "АРТИКУЛ", Description = "Ячейка содержащая артикул РЕХАУ")] string line)
+    {
+        if (!ProductSku.TryParse(line, out var skus))
         {
             return ExcelError.ExcelErrorNA;
         }
         else
         {
-			var product = products.First();
-			return $"{product.Id} {product.Name}";
-		}
-	}
-
-	[ExcelFunction(Name = "РЕХАУАРТИКУЛ")]
-	public static object SkuSearch(string query)
-	{
-		if (ProductSku.TryParse(query, out var skus))
-		{
-			return skus.First().Id;
-		}
-		return ExcelError.ExcelErrorNA;
-	}
-
-	[ExcelFunction(Name = "РЕХАУИМЯ")]
-	public static object GetProductName(string query)
-	{
-		if (!ProductSku.TryParse(query, out var skus))
-		{
-			return ExcelError.ExcelErrorNA;
-		}
             var article = skus.First().Id;
-		var functionName = nameof(GetProductName);
-		var parameters = new object[] { query };
-		if (ExcelAsyncUtil.RunTask(functionName, parameters, async () =>
+            IDatabaseClient databaseClient = RhSolutionsAddIn.ServiceProvider.GetService<IDatabaseClient>();
+
+            if (ExcelAsyncUtil.Run(nameof(РЕХАУИМЯ), line, delegate
             {
-			return await databaseClient.GetProducts(article);
+                return databaseClient.GetProducts(article)
+                    .GetAwaiter()
+                    .GetResult();
             }) is not IEnumerable<Product> requestResult)
             {
                 return "Загрузка...";
             }
-		else if (!requestResult.Any())
+            else
+            {
+                if (!requestResult.Any())
                 {
                     return ExcelError.ExcelErrorNA;
                 }
@@ -80,26 +103,33 @@ public static class RhSolutionsFunctions
                     return firstProduct.Name;
                 }
             }
+        }
+    }
 
-	[ExcelFunction(Name = "РЕХАУЦЕНА")]
-	public static object GetProductPrice(string query)
+    [ExcelFunction(Description = "Поиск цены артикула РЕХАУ в евро")]
+    public static object РЕХАУЦЕНА([ExcelArgument(Name = "АРТИКУЛ", Description = "Ячейка содержащая артикул РЕХАУ")] string line)
     {
-		if (!ProductSku.TryParse(query, out var skus))
+        if (!ProductSku.TryParse(line, out var skus))
         {
             return ExcelError.ExcelErrorNA;
         }
-		var article = skus.First().Id;
-		var functionName = nameof(GetProductPrice);
-		var parameters = new object[] { article };
-
-		if (ExcelAsyncUtil.RunTask(functionName, parameters, async () =>
+        else
         {
-			return await databaseClient.GetProducts(article);
+            var article = skus.First().Id;
+            IDatabaseClient databaseClient = RhSolutionsAddIn.ServiceProvider.GetService<IDatabaseClient>();
+
+            if (ExcelAsyncUtil.Run(nameof(РЕХАУЦЕНА), line, delegate
+            {
+                return databaseClient.GetProducts(article)
+                    .GetAwaiter()
+                    .GetResult();
             }) is not IEnumerable<Product> requestResult)
             {
                 return "Загрузка...";
             }
-		else if (!requestResult.Any())
+            else
+            {
+                if (!requestResult.Any())
                 {
                     return ExcelError.ExcelErrorNA;
                 }
@@ -109,42 +139,65 @@ public static class RhSolutionsFunctions
                     return Math.Round(firstProduct.Price * 1.2m, 2);
                 }
             }
+        }
+    }
 
-	[ExcelFunction(Name = "РЕХАУЦЕНАРУБ")]
-	public static object GetProductPriceRub(string query, double dateField)
+    [ExcelFunction(Description = "Поиск цены артикула РЕХАУ в рублях")]
+    public static object РЕХАУЦЕНАРУБ([ExcelArgument(Name = "АРТИКУЛ", Description = "Ячейка содержащая артикул РЕХАУ")] string line,
+        [ExcelArgument(Name = "ДАТА", Description = "Дата в формате Excel (необязательно)")] double dateField)
     {
-		if (!ProductSku.TryParse(query, out var skus))
+        if (!ProductSku.TryParse(line, out var skus))
         {
             return ExcelError.ExcelErrorNA;
         }
+        else
+        {
+            IDatabaseClient databaseClient = RhSolutionsAddIn.ServiceProvider.GetService<IDatabaseClient>();
+            ICurrencyClient currencyClient = RhSolutionsAddIn.ServiceProvider.GetRequiredService<ICurrencyClient>();
+            IMemoryCache memoryCache = RhSolutionsAddIn.ServiceProvider.GetRequiredService<IMemoryCache>();
             var article = skus.First().Id;
             DateTime date = dateField == 0 ? DateTime.Today : DateTime.FromOADate(dateField);
 
-
-		var functionName = nameof(GetProductPriceRub);
-		var parameters = new object[] { date };
-
-		if (ExcelAsyncUtil.RunTask(functionName, parameters, async () =>
+            if (!memoryCache.TryGetValue(date, out decimal exchangeRate))
             {
-			var requestResult = await currencyClient.GetExchangeRate(date);
+                var result = ExcelAsyncUtil.Run(nameof(КУРСЕВРО), dateField, delegate
+                {
+                    var requestResult = currencyClient.GetExchangeRate(date)
+                        .GetAwaiter()
+                        .GetResult();
+
                     return requestResult ?? -1m;
-		}) is not decimal exchangeRate)
+                });
+
+                if (result is not decimal)
                 {
                     return "Загрузка...";
                 }
-
-		parameters = new object[] { query };
-		if (ExcelAsyncUtil.RunTask(functionName, parameters, async () =>
+                else
                 {
-			var products = await databaseClient.GetProducts(article);
-			var product = products.FirstOrDefault();
+                    exchangeRate = (decimal)result;
+                    var cacheEntryOptions = new MemoryCacheEntryOptions()
+                        .SetSlidingExpiration(TimeSpan.FromHours(1));
+                    memoryCache.Set(date, exchangeRate, cacheEntryOptions);
+                }
+            }
+
+            if (ExcelAsyncUtil.Run(nameof(РЕХАУЦЕНАРУБ), line, delegate
+            {
+                var product = databaseClient.GetProducts(article)
+                    .GetAwaiter()
+                    .GetResult()
+                    .FirstOrDefault();
+
                 return product == null ? -1m :
-				product.Price * (decimal)exchangeRate * 1.2m;
+                    product.Price * exchangeRate * 1.2m;
             }) is not decimal requestResult)
             {
                 return "Загрузка...";
             }
-		else if (requestResult < 0 || exchangeRate < 0)
+            else
+            {
+                if (requestResult < 0)
                 {
                     return ExcelError.ExcelErrorNA;
                 }
@@ -154,3 +207,39 @@ public static class RhSolutionsFunctions
                 }
             }
         }
+    }
+
+    [ExcelFunction(Description = "Получить курс евро по ЦБ")]
+    public static object КУРСЕВРО([ExcelArgument(Name = "ДАТА", Description = "Дата в формате Excel (необязательно)")] double dateField)
+    {
+        ICurrencyClient currencyClient = RhSolutionsAddIn.ServiceProvider.GetRequiredService<ICurrencyClient>();
+        IMemoryCache memoryCache = RhSolutionsAddIn.ServiceProvider.GetRequiredService<IMemoryCache>();
+        DateTime date = dateField == 0 ? DateTime.Today : DateTime.FromOADate(dateField);
+
+        if (!memoryCache.TryGetValue(date, out decimal exchangeRate))
+        {
+            var result = ExcelAsyncUtil.Run(nameof(КУРСЕВРО), dateField, delegate
+            {
+                var requestResult = currencyClient.GetExchangeRate(date)
+                    .GetAwaiter()
+                    .GetResult();
+
+                return requestResult ?? -1m;
+            });
+
+            if (result is not decimal)
+            {
+                return "Загрузка...";
+            }
+            else
+            {
+                exchangeRate = (decimal)result; 
+                var cacheEntryOptions = new MemoryCacheEntryOptions()
+                    .SetSlidingExpiration(TimeSpan.FromHours(1));
+                memoryCache.Set(date, exchangeRate, cacheEntryOptions);
+            }
+        }
+
+        return exchangeRate < 0 ? ExcelError.ExcelErrorNA : exchangeRate;
+    }
+}

RhSolutions.AddIn/Controllers/RibbonController.cs

@@ -1,11 +1,16 @@
 using ExcelDna.Integration.CustomUI;
-using System.IO;
 using System.Reflection;
 using System.Runtime.InteropServices;
+#if! NET472
+using System.Runtime.Versioning;
+#endif
 using System.Windows.Forms;
 
 namespace RhSolutions.Controllers;
 
+#if !NET472
+[SupportedOSPlatform("windows")]
+#endif
 [ComVisible(true)]
 public class RibbonController : ExcelRibbon
 {
@@ -109,7 +114,7 @@ public class RibbonController : ExcelRibbon
     public string GetPriceListPathLabel(IRibbonControl control)
     {
         string name = RhSolutionsAddIn.Configuration.GetPriceListFileName();
-        return string.IsNullOrEmpty(name) ? "Указать шаблонный файл" : name;
+        return string.IsNullOrEmpty(name) ? "Шаблонный файл" : name;
     }
 
     public static void UpdateWorkbookValidation()
@@ -123,13 +128,4 @@ public class RibbonController : ExcelRibbon
             _workbookIsValid = worksheet.IsValidSource();
         }
     }
-
-    public static void EnsurePriseListExists()
-    {
-        string pricelistPath = RhSolutionsAddIn.Configuration.GetPriceListPath();
-        if (!File.Exists(pricelistPath))
-        {
-            RhSolutionsAddIn.Configuration.SetPriceListPath(string.Empty);
-        }
-    }
 }

RhSolutions.AddIn/Properties/AssemblyInfo.cs

@@ -31,5 +31,5 @@ using System.Runtime.InteropServices;
 // You can specify all the values or you can default the Build and Revision Numbers
 // by using the '*' as shown below:
 // [assembly: AssemblyVersion("1.0.*")]
-[assembly: AssemblyVersion("1.9.5.1")]
-[assembly: AssemblyFileVersion("1.9.5.1")]
+[assembly: AssemblyVersion("1.9.0.0")]
+[assembly: AssemblyFileVersion("1.9.0.0")]

RhSolutions.AddIn/Properties/launchSettings.json

@@ -3,7 +3,7 @@
     "Excel": {
       "commandName": "Executable",
       "executablePath": "C:\\Program Files\\Microsoft Office\\root\\Office16\\EXCEL.EXE",
-      "commandLineArgs": "/x \"RhSolutions-AddIn64.xll\""
+      "commandLineArgs": "RhSolutions-AddIn64.xll"
     }
   }
 }

RhSolutions.AddIn/RhSolutions-AddIn.dna

@@ -1,7 +1,6 @@
 <?xml version="1.0" encoding="utf-8"?>
 <DnaLibrary Name="RhSolutions Add-In" RuntimeVersion="v4.0" xmlns="http://schemas.excel-dna.net/addin/2020/07/dnalibrary">
   <ExternalLibrary Path="RhSolutions.AddIn.dll" ExplicitExports="false" LoadFromBytes="true" Pack="true" IncludePdb="false" />
-	<Reference Path="ExcelDna.Registration.dll" Pack="true" />
 	<Reference Path="Microsoft.Bcl.AsyncInterfaces.dll" Pack="true" />
 	<Reference Path="Microsoft.Bcl.HashCode.dll" Pack="true" />
 	<Reference Path="Microsoft.Extensions.Caching.Abstractions.dll" Pack="true" />
@@ -13,6 +12,7 @@
 	<Reference Path="Microsoft.Extensions.Logging.dll" Pack="true" />
 	<Reference Path="Microsoft.Extensions.Options.dll" Pack="true" />
 	<Reference Path="Microsoft.Extensions.Primitives.dll" Pack="true" />
+	<Reference Path="ExcelDna.IntelliSense.dll" Pack="true" />
 	<Reference Path="Newtonsoft.Json.dll" Pack="true" />
 	<Reference Path="netDxf.dll" Pack="true" />
 	<Reference Path="RhSolutions.ProductSku.dll" Pack="true" />

RhSolutions.AddIn/RhSolutions.AddIn.csproj

@@ -1,6 +1,6 @@
 <Project Sdk="Microsoft.NET.Sdk">
 	<PropertyGroup>
-		<TargetFrameworks>net472;net6.0-windows</TargetFrameworks>
+		<TargetFrameworks>net472</TargetFrameworks>
 		<LangVersion>10</LangVersion>
 		<OutputType>Library</OutputType>
 		<RootNamespace>RhSolutions</RootNamespace>
@@ -8,17 +8,35 @@
 		<GenerateAssemblyInfo>false</GenerateAssemblyInfo>
 		<UseWindowsForms>true</UseWindowsForms>
 		<ImportWindowsDesktopTargets>true</ImportWindowsDesktopTargets>
+		<ExcelDnaPackCompressResources>false</ExcelDnaPackCompressResources>
+	</PropertyGroup>
+	<PropertyGroup>
+		<StartupObject />
+	</PropertyGroup>
+	<PropertyGroup Condition="'$(Configuration)|$(TargetFramework)|$(Platform)'=='Debug|net472|AnyCPU'">
+	  <NoWarn>1701;1702</NoWarn>
+	</PropertyGroup>
+	<PropertyGroup Condition="'$(Configuration)|$(TargetFramework)|$(Platform)'=='Release|net472|AnyCPU'">
+	  <NoWarn>1701;1702</NoWarn>
+	</PropertyGroup>
+	<PropertyGroup Condition="'$(Configuration)|$(TargetFramework)|$(Platform)'=='Debug|net6.0-windows7.0|AnyCPU'">
+	  <NoWarn>1701;1702</NoWarn>
+	</PropertyGroup>
+	<PropertyGroup Condition="'$(Configuration)|$(TargetFramework)|$(Platform)'=='Release|net6.0-windows7.0|AnyCPU'">
+	  <NoWarn>1701;1702</NoWarn>
 	</PropertyGroup>
 	<ItemGroup>
-		<PackageReference Include="ExcelDna.AddIn" Version="1.8.0" />
-		<PackageReference Include="ExcelDna.Integration" Version="1.8.0" />
+		<PackageReference Include="ExcelDna.AddIn" Version="1.6.0">
+		  <TreatAsUsed>true</TreatAsUsed>
+		</PackageReference>
+		<PackageReference Include="ExcelDna.Integration" Version="1.6.0" />
+		<PackageReference Include="ExcelDna.IntelliSense" Version="1.6.0" />
 		<PackageReference Include="ExcelDna.Interop" Version="15.0.1" />
-		<PackageReference Include="ExcelDna.Registration" Version="1.8.0" />
-		<PackageReference Include="Microsoft.Bcl.AsyncInterfaces" Version="8.0.0" />
+		<PackageReference Include="Microsoft.Bcl.AsyncInterfaces" Version="7.0.0" />
 		<PackageReference Include="Microsoft.Bcl.HashCode" Version="1.1.1" />
 		<PackageReference Include="Microsoft.CSharp" Version="4.7.0" />
-		<PackageReference Include="Microsoft.Extensions.Caching.Memory" Version="8.0.1" />
-		<PackageReference Include="Microsoft.Extensions.Http" Version="8.0.1" />
+		<PackageReference Include="Microsoft.Extensions.Caching.Memory" Version="7.0.0" />
+		<PackageReference Include="Microsoft.Extensions.Http" Version="7.0.0" />
 		<PackageReference Include="netDxf" Version="2022.11.2" />
 		<PackageReference Include="Newtonsoft.Json" Version="13.0.3" />
 		<PackageReference Include="System.Buffers" Version="4.5.1" />

RhSolutions.AddIn/Services/CouplingsCalculator.cs

@@ -38,11 +38,11 @@ public class CouplingsCalculator : IFittingsCalculator
             .ToDictionary(kvp =>
         kvp.Key switch
         {
-            "16" => new Product("11080111001"),
-            "20" => new Product("11080121001"),
-            "25" => new Product("11080131001"),
-            "32" => new Product("11080141001"),
-            "40" => new Product("11080151001"),
+            "16" => new Product("11600111001"),
+            "20" => new Product("11600121001"),
+            "25" => new Product("11600131001"),
+            "32" => new Product("11600141001"),
+            "40" => new Product("11600151001"),
             "50" => new Product("14563021001"),
             "63" => new Product("14563031001"),
             _ => throw new Exception($"Неизвестный диаметр {kvp.Key}")

RhSolutions.AddIn/Services/CurrencyClient.cs

@@ -1,5 +1,4 @@
-using Microsoft.Extensions.Caching.Memory;
-using System.Net;
+using System.Net;
 using System.Net.Http;
 using System.Threading.Tasks;
 using System.Xml.Linq;
@@ -9,19 +8,15 @@ namespace RhSolutions.Services;
 public class CurrencyClient : ICurrencyClient
 {
     private readonly HttpClient _httpClient;
-    private readonly IMemoryCache _memoryCache;
     private const string _requestAddress = @"https://www.cbr.ru/scripts/XML_daily.asp?date_req=";
     public HttpStatusCode StatusCode { get; private set; }
 
-    public CurrencyClient(HttpClient httpClient, IMemoryCache memoryCache)
+    public CurrencyClient(HttpClient httpClient)
     {
         _httpClient = httpClient;
-        _memoryCache = memoryCache;
     }
 
     public async Task<decimal?> GetExchangeRate(DateTime date)
-    {
-        if (!_memoryCache.TryGetValue(date, out decimal exchangeRate))
     {
         string request = $"{_requestAddress}{date.Date:dd/MM/yyyy}";
         HttpResponseMessage response = await _httpClient.GetAsync(request);
@@ -30,13 +25,11 @@ public class CurrencyClient : ICurrencyClient
             response.EnsureSuccessStatusCode();
             string xml = await response.Content.ReadAsStringAsync();
             XElement valCourses = XElement.Parse(xml);
-                exchangeRate = decimal.Parse(valCourses.Elements("Valute")
+
+            decimal? exchangeRate = decimal.Parse(valCourses.Elements("Valute")
                 .Where(e => e.Element("Name").Value == "Евро")
                 .FirstOrDefault()
                 .Element("Value").Value);
-                var cacheEntryOptions = new MemoryCacheEntryOptions()
-                    .SetSlidingExpiration(TimeSpan.FromHours(1));
-                _memoryCache.Set(date, exchangeRate, cacheEntryOptions);
             return exchangeRate;
         }
         catch
@@ -45,6 +38,4 @@ public class CurrencyClient : ICurrencyClient
             return null;
         }
     }
-        return exchangeRate;        
-    }
 }

RhSolutions.AddIn/Services/ExcelReader.cs

@@ -79,7 +79,7 @@ public class ExcelReader : IReader, IDisposable
         return readResult;
     }
 
-    public IEnumerable<(string, Dictionary<Product, double>)>
+    public List<(string, Dictionary<Product, double>)>
         ReadProducts(IEnumerable<Worksheet> worksheets)
     {
         List<(string, Dictionary<Product, double>)> result = new();
@@ -151,15 +151,11 @@ public class ExcelReader : IReader, IDisposable
 
             result.Add((wbName, readResult));
         }
-        return result.OrderBy(x => x.Item1);
+        return result;
     }
 
-    public IEnumerable<(string, Dictionary<Product, double>)> ReadProducts(string[] files)
+    public List<(string, Dictionary<Product, double>)> ReadProducts(string[] files)
     {
-        HashSet<string> openedFiles = RhSolutionsAddIn.Excel.Workbooks
-            .Cast<Workbook>()
-            .Select(wb => wb.FullName)
-            .ToHashSet();
         _progressBar = new("Открываю исходные файлы...", files.Length);
         List<Worksheet> worksheets = new();
 
@@ -174,11 +170,7 @@ public class ExcelReader : IReader, IDisposable
         var result = ReadProducts(worksheets);
         foreach (var ws in worksheets)
         {
-            string file = (string)ws.Parent.FullName;
-            if (!openedFiles.Contains(file))
-            {
-                ws.Parent.Close(SaveChanges: false);
-            }
+            ws.Parent.Close();
         }
         return result;
     }

RhSolutions.AddIn/Services/ExcelWriterBase.cs

@@ -70,7 +70,6 @@ namespace RhSolutions.Services
                         .Insert(XlInsertShiftDirection.xlShiftToRight, XlInsertFormatOrigin.xlFormatFromRightOrBelow);
 
                     Range newColumnHeader = _worksheet.Cells[_amountCell.Row, _amountCell.Column - 1];
-                    newColumnHeader.NumberFormat = "@";
                     newColumnHeader.Value2 = $"{product.Item1}";
                     newColumnHeader.WrapText = true;
 

RhSolutions.AddIn/Services/GuessReader.cs

@@ -192,7 +192,7 @@ public class GuessReader : IReader
         return result;
     }
 
-    public IEnumerable<(string, Dictionary<Product, double>)> ReadProducts(IEnumerable<Worksheet> worksheets)
+    public List<(string, Dictionary<Product, double>)> ReadProducts(IEnumerable<Worksheet> worksheets)
     {
         List<(string, Dictionary<Product, double>)> result = new();
         foreach (Worksheet worksheet in worksheets)
@@ -206,7 +206,7 @@ public class GuessReader : IReader
         return result;
     }
 
-    public IEnumerable<(string, Dictionary<Product, double>)> ReadProducts(string[] files)
+    public List<(string, Dictionary<Product, double>)> ReadProducts(string[] files)
     {
         _progressBar = new("Открываю исходные файлы...", files.Length);
         List<Worksheet> worksheets = new();

RhSolutions.AddIn/Services/IReader.cs

@@ -3,7 +3,7 @@
 public interface IReader : IDisposable
 {
     public Dictionary<Product, double> ReadProducts(Range range);
-    public IEnumerable<(string, Dictionary<Product, double>)> ReadProducts(IEnumerable<Worksheet> worksheets);
-    public IEnumerable<(string, Dictionary<Product, double>)> ReadProducts(string[] files);
+    public List<(string, Dictionary<Product, double>)> ReadProducts(IEnumerable<Worksheet> worksheets);
+    public List<(string, Dictionary<Product, double>)> ReadProducts(string[] files);
     new void Dispose();
 } 

RhSolutions.AddIn/Services/SleevesCalculator.cs

@@ -20,11 +20,6 @@ public class SleevesCalculator : IFittingsCalculator
             ["40"] = 0,
             ["50"] = 0,
             ["63"] = 0,
-			["16PX"] = 0,
-			["20PX"] = 0,
-			["25PX"] = 0,
-			["32PX"] = 0,
-			["40PX"] = 0
         };
         var rautitanProducts = products.Where(kvp => kvp.Key.ProductLines.Contains("RAUTITAN"));
 
@@ -35,16 +30,9 @@ public class SleevesCalculator : IFittingsCalculator
             {
                 CaptureCollection collection = doubleCollection[0].Groups["Sleeve"].Captures;
                 foreach (Capture sleeve in collection)
-				{
-					if (kvp.Key.Name.Contains("PX"))
-					{
-						result[$"{sleeve.Value}PX"] += kvp.Value * 2;
-					}
-					else
                 {
                     result[sleeve.Value] += kvp.Value * 2;
                 }
-				}
                 continue;
             }
             var singleCollection = Regex.Matches(kvp.Key.Name, singlePattern);
@@ -52,35 +40,23 @@ public class SleevesCalculator : IFittingsCalculator
             {
                 CaptureCollection collection = singleCollection[0].Groups["Sleeve"].Captures;
                 foreach (Capture sleeve in collection)
-				{
-					if (kvp.Key.Name.Contains("PX"))
-					{
-						result[$"{sleeve.Value}PX"] += kvp.Value;
-					}
-					else
                 {
                     result[sleeve.Value] += kvp.Value;
                 }
             }
         }
-		}
 
         return result
             .ToDictionary(kvp =>
         kvp.Key switch
         {
-			"16" => new Product("11080011001"),
-			"20" => new Product("11080021001"),
-			"25" => new Product("11080031001"),
-			"32" => new Product("11080041001"),
-			"40" => new Product("11080051001"),
-			"50" => new Product("11397713002"),
-			"63" => new Product("11397813002"),
-			"16PX" => new Product("11600011001"),
-			"20PX" => new Product("11600021001"),
-			"25PX" => new Product("11600031001"),
-			"32PX" => new Product("11600041001"),
-			"40PX" => new Product("11600051001"),
+            "16" => new Product("11600011001"),
+            "20" => new Product("11600021001"),
+            "25" => new Product("11600031001"),
+            "32" => new Product("11600041001"),
+            "40" => new Product("11600051001"),
+            "50" => new Product("11397711002"),
+            "63" => new Product("11397811002"),
             _ => throw new Exception($"Неизвестный диаметр {kvp.Key}")
         }, kvp => kvp.Value);
     }

RhSolutions.AddIn/Tools/EventsUtil.cs

@@ -1,12 +1,17 @@
 using RhSolutions.Controllers;
+#if !NET472
+using System.Runtime.Versioning;
+#endif
 
 namespace RhSolutions.Tools;
 
+#if !NET472
+[SupportedOSPlatform("windows")]
+#endif
 internal static class EventsUtil
 {
     public static void Initialize()
     {
-        RibbonController.EnsurePriseListExists();
         RhSolutionsAddIn.Excel.SheetSelectionChange += RefreshExportButton;
         RhSolutionsAddIn.Excel.SheetActivate += RefreshButtons;
         RhSolutionsAddIn.Excel.WorkbookActivate += RefreshButtons;

RhSolutions.AddIn/Tools/MergeTool.cs

@@ -17,12 +17,9 @@ internal class MergeTool : Tool
     {
         IFileDialog dialog = RhSolutionsAddIn.ServiceProvider.GetRequiredService<IFileDialog>();
         string[] files = dialog.GetFiles();
-        if (files.Length > 0)
-        {
         _reader = _readerFactory.GetReader("Excel");
         var products = _reader.ReadProducts(files);
         _writer = _writerFactory.GetWriter("NewPrice");
         _writer.WriteProducts(products);
     }
 }
-}

RhSolutions.Tests/CanFillCouplings.cs

@@ -28,10 +28,11 @@ public class CanFillCouplings : IDisposable
         var products = _reader.ReadProducts(new[] { _worksheet });
         var couplings = _calculator.Calculate(products.First().Item2);
         _writer.WriteProducts(couplings);
-		for (int i = 2; i < 14; i++)
-		{
-			Assert.Equal(_worksheet.Range[$"F{i}"].Value, _worksheet.Range[$"E{i}"].Value);
-		}
+
+        Assert.Equal(7, _worksheet.Range["E2"].Value);
+        Assert.Equal(1, _worksheet.Range["E3"].Value);
+        Assert.Equal(1, _worksheet.Range["E5"].Value);
+        Assert.Equal(1, _worksheet.Range["E7"].Value);
     }
 
     public void Dispose()

RhSolutions.Tests/CanFillSleeves.cs

@@ -28,10 +28,14 @@ public class CanFillSleeves : IDisposable
         var products = _reader.ReadProducts(new[] { _worksheet });
         var sleeves = _calculator.Calculate(products.First().Item2);
         _writer.WriteProducts(sleeves);
-        for (int i = 2; i < 14; i++)
-        {
-            Assert.Equal(_worksheet.Range[$"F{i}"].Value, _worksheet.Range[$"E{i}"].Value);
-        }
+
+        Assert.Equal(25, _worksheet.Range["E2"].Value);
+        Assert.Equal(15, _worksheet.Range["E3"].Value);
+        Assert.Equal(7, _worksheet.Range["E4"].Value);
+        Assert.Equal(8, _worksheet.Range["E5"].Value);
+        Assert.Equal(1, _worksheet.Range["E6"].Value);
+        Assert.Equal(3, _worksheet.Range["E7"].Value);
+        Assert.Equal(4, _worksheet.Range["E8"].Value);
     }
 
     public void Dispose()

RhSolutions.Tests/RhSolutions.Tests.csproj

@@ -10,7 +10,7 @@
 
 	<ItemGroup>
 		<PackageReference Include="ExcelDna.Interop" Version="15.0.1" />
-		<PackageReference Include="ExcelDna.Testing" Version="1.8.0" />
+		<PackageReference Include="ExcelDna.Testing" Version="1.6.0" />
 	</ItemGroup>
 
 	<ItemGroup>